Skip to content

Instantly share code, notes, and snippets.

View brianberns's full-sized avatar

Brian Berns brianberns

View GitHub Profile
open Microsoft.EntityFrameworkCore
open System.Linq
[<CLIMutable>]
type YourTable =
{
id : int
rev : int
contents : string
}
open System
open Thoth.Json.Net
type DecodeBuilder() =
member _.Bind(decoder, f) : Decoder<_> =
Decode.andThen f decoder
member _.Return(value) =
Decode.succeed value
member _.ReturnFrom(decoder : Decoder<_>) =
decoder