anchor.diff:      OriginalName : string
       ClsName : string
       GetFunc : Reflection.GetterFunc
  -    WriteFunc : WriterFunc
  +    WriteFunc : Lazy<WriterFunc>
       Default : obj }
   
   module SerializerBase =
  
positive.code:           OriginalName = propInfo.Name
            ClsName = propInfo.Name.ToCamelCase()
            GetFunc = Reflection.getObjGetter propInfo
            WriteFunc = getWriterFunc propInfo.PropertyType
            Default = Reflection.getDefaultValue propInfo.PropertyType }
  
      /// Try to determine a enumerable serialization function
  
negative.code:             Atom.updateAtomDict propertyCache t props
  
      /// Writer for classes and other reference types
      and writeClass props (writer : TextWriter) (value : obj) =
          props
          |> Array.iter (fun p ->
              let v = p.GetFunc.Invoke(value)
              if v <> null then
                  let writeFunc = p.WriteFunc.Value
                  writeTag writer p.ClsName writeFunc v)
  
      /// Try to determine a class or interface serialization function
      and getClassWriter (t : Type) = fun () ->
  