isaacabraham

/// Code to bind mailbox processors to azure storage queues.
module AzureMailboxProcessor
    open System

    module private Async =
        let AwaitTaskEmpty = Async.AwaitIAsyncResult >> Async.Ignore

    module private Option =
        let fromNullable (nullable:Nullable<_>) = if nullable.HasValue then Some nullable.Value else None
        let toNullable = function