anchor.diff:      let options = YamlDotNet.Serialization.SerializationOptions.EmitDefaults
       let serializer = new YamlDotNet.Serialization.Serializer(options)
       let deserializer = new YamlDotNet.Serialization.Deserializer(ignoreUnmatched = true)
  +    
  +    let serialize (body : obj, stream : Stream) = 
  +        use TextWriter = new StreamWriter(stream)
  +        serializer.Serialize(TextWriter, body)
  +    
       interface IFormatter with
           
           member x.SerializeToString(body : obj) = 
  
positive.code:             use writer = new StreamWriter(stream)
              let body = JsonConvert.SerializeObject(body, options)
              writer.Write(body)
              writer.Flush()
          
          member x.SupportedHeaders() : string [] = 
              [| "application/json"; "text/json"; "application/json;charset=utf-8"; "application/json; charset=utf-8" |]
  
  [<Sealed>]
  type ProtoBufferFormatter() = 
      interface IFormatter with
          member x.SerializeToString(body : obj) = failwith "Not implemented yet"
          member x.DeSerialize<'T>(stream : Stream) = ProtoBuf.Serializer.Deserialize<'T>(stream)
          member x.Serialize(body : obj, stream : Stream) : unit = ProtoBuf.Serializer.Serialize(stream, body)
          member x.SupportedHeaders() : string [] = [| "application/x-protobuf"; "application/octet-stream" |]
  
  [<Sealed>]
  
negative.code: // ----------------------------------------------------------------------------
  namespace FlexSearch.Core
  
  open Microsoft.Owin
  open Newtonsoft.Json
  open Newtonsoft.Json.Converters
  open System.IO
  
  [<Sealed>]
  type JilJsonFormatter() = 
      let options = new Jil.Options(false, false, false, Jil.DateTimeFormat.ISO8601, false)
      interface IFormatter with
          member x.SerializeToString(body : obj) = failwith "Not implemented yet"
          
  