anchor.diff:          b.WriteInt32 i
   
       let writeInt64 (i: int64) =
  -        b.WriteInt64 i
  +        b.WriteInt64 i 
   
       let writeString (str: string) =
           b.WriteUTF16 str
  
positive.code:             infos
              |> List.iter (fun info -> writeEntityRef info.DeclaringTyconRef)
  
          | Item.TypeVar(nm, typar) ->
              writeString ItemKeyTags.itemTypeVar
              writeString nm
              writeTypar typar
  
          | Item.Types(_, [ty]) ->
              writeType ty
  
          | Item.UnqualifiedType [tcref] ->
              writeEntityRef tcref
  
negative.code: 
      [<Literal>]
      let itemDelegateCtor = "g$"
  
      [<Literal>]
      let parameters = "p$p$"
  
  [<Sealed>]
  type ItemKeyStore(mmf: MemoryMappedFile, length) =
  