anchor.diff:  
   let jsonObject = JsonObjectBuilder()
   
  -type DefaultConverter () = 
  +let makeDefaultSettings() = 
  +    let settings = Microsoft.FSharpLu.Json.Compact.Internal.Settings.settings
  +    settings.NullValueHandling <- NullValueHandling.Ignore
  +    settings.MissingMemberHandling <- MissingMemberHandling.Ignore
  +    settings
  +
  +let makeDefaultSerializer (settings: JsonSerializerSettings) = 
  +    JsonSerializer.Create(settings)
  +
  +type DefaultConverter (defaultSerializer: JsonSerializer, defaultSerializerSettings: JsonSerializerSettings) = 
       inherit ICouchConverter()
   
       let stringify o = JsonConvert.SerializeObject(o, defaultSerializerSettings)
  
positive.code:               Reason = token.Value<string>("reason")
                Rev = rev }
              |> Some
  
      override __.ConvertListOptionsToMap options = 
          let rec inner remaining qs = 
  
negative.code: open Newtonsoft.Json.Linq
  open Types
  open Infrastructure
  
  type JsonObjectBuilder() = 
      member __.Yield(x: JsonValue) = [x]
  