anchor.diff:  
   type EmbeddedFile =
       {
  +        ResAssembly : string
           mutable ResContent : string
           ResContentBytes : byte []
           ResContentType : string
  
positive.code:     member ri.Content =
          match ri.ResContent with
          | null ->
              let s = UTF8Encoding(false, true).GetString(ri.ResContentBytes)
              ri.ResContent <- s
              s
          | s -> s
  
      member ri.ContentType = ri.ResContentType
  
negative.code:                 readResourceBytes resourceName def
                  |> Option.map (fun c ->
                      {
                          ResAssembly = string def.FullName
                          ResContent = null
                          ResContentBytes = c
                          ResContentType = contentType
  