denmerc

type Message<'S> =
  | Query of ('S -> unit)
  | Command of ('S -> 'S)
  | Kill

type CQAgent<'S>(state: 'S) =
  let innerModel =
    MailboxProcessor<Message<'S>>.Start(fun inbox ->
      let rec messageLoop (state: 'S) =
        async {

denmerc

Synopsis

At the top of the file there should be a short introduction and/ or overview that explains what the project is. This description should match descriptions added for package managers (Gemspec, package.json, etc.)

Code Example

Show what the library does as concisely as possible, developers should be able to figure out how your project solves their problem by looking at the code example. Make sure the API you are showing off is obvious, and that your code is short and concise.

Motivation

denmerc

#time "on"
#load "Bootstrap.fsx"

open System
open Akka.Actor
open Akka.Configuration
open Akka.FSharp
open Akka.TestKit

// #Using Actor

denmerc

Hi Nicholas,

I saw you tweet about JSX yesterday. It seemed like the discussion devolved pretty quickly but I wanted to share our experience over the last year. I understand your concerns. I've made similar remarks about JSX. When we started using it Planning Center, I lead the charge to write React without it. I don't imagine I'd have much to say that you haven't considered but, if it's helpful, here's a pattern that changed my opinion:

The idea that "React is the V in MVC" is disingenuous. It's a good pitch but, for many of us, it feels like in invitation to repeat our history of coupled views. In practice, React is the V and the C. Dan Abramov describes the division as Smart and Dumb Components. At our office, we call them stateless and container components (view-controllers if we're Flux). The idea is pretty simple: components can'

denmerc

//==========================================
// Working fully self-contained getting-started example for Suave Web Server scripting 
//
// Note you don't need to have _anything_ installed before starting with this script. Nothing
// but F# Interactive and this script.
//
// This script fetches the Paket.exe component which is referenced later in the script. 
// Initially the #r "paket.exe" reference is shown as unresolved. Once it has been
// downloaded by the user (by executing the first part of the script) the reference 
// shows as resolved and can be used.

denmerc

open System.Net.Sockets

type A = System.Net.Sockets.SocketAsyncEventArgs
type B = System.ArraySegment<byte>

exception SocketIssue of SocketError with
    override this.ToString() =
        string this.Data0

/// Wraps the Socket.xxxAsync logic into F# async logic.

denmerc

open System
open System.Net
open System.Text
open System.IO
 
// Modified from http://sergeytihon.wordpress.com/2013/05/18/three-easy-ways-to-create-simple-web-server-with-f/
// download this file to your root directory and name as ws.fsx
// run with `fsi --load:ws.fsx`
// visit http://localhost:8080
 

denmerc

public class BootstrapService : ServiceControl
{
	private readonly HostSettings _settings;
	private Container _container;
	private CaseMonitor _monitor;

	public BootstrapService(HostSettings settings)
	{
		_settings = settings;
	}

denmerc

let CreateActor (ActorKey name) =
    MailboxProcessor.Start(fun mailbox ->
        let messageStore = GetMessageStore name
        let rec loop data =
            async {
                // Wait asynchronously until we get a message + reply channel
                let! message, replyWith = mailbox.Receive()

                match message with
                | Clear ->

denmerc

using System;
using System.IO;
using System.Reactive.Disposables;
using System.Reactive.Linq;
using ReactiveUI;

namespace SaveAllTheTime.Models
{
    interface IFilesystemWatchCache
    {