anchor.diff:  [<NoEquality; NoComparison>]
   type PickledDataWithReferences<'rawData> = 
       { /// The data that uses a collection of CcuThunks internally
  -      RawData: 'rawData; 
  +      RawData: 'rawData
         /// The assumptions that need to be fixed up
         FixupThunks: list<CcuThunk> } 
   
       member x.Fixup loader =
  -        x.FixupThunks |> List.iter (fun reqd -> reqd.Fixup(loader reqd.AssemblyName)) ;
  +        x.FixupThunks |> List.iter (fun reqd -> reqd.Fixup(loader reqd.AssemblyName))
           x.RawData
   
       /// Like Fixup but loader may return None, in which case there is no fixup.
  
positive.code: let p_osgn_decl (outMap : NodeOutTable<_,_>) p x st = 
      let stamp = outMap.NodeStamp x
      let idx = outMap.Table.FindOrAdd stamp
      //dprintf "decl %d#%d in table %s has name %s\n" idx (outMap.NodeStamp x) outMap.Name (outMap.NodeName x);
      p_tup2 p_int p (idx,outMap.Deref x) st
  
  let u_osgn_ref (inMap: NodeInTable<_,_>) st = 
      let n = u_int st
      if n < 0 || n >= inMap.Count then ufailwith st ("u_osgn_ref: out of range, table = "+inMap.Name+", n = "+string n); 
      inMap.Get n
  
  let u_osgn_decl (inMap: NodeInTable<_,_>) u st = 
      let idx,data = u_tup2 u_int u st
      //   dprintf "unpickling osgn %d in table %s\n" idx nm; 
      let res = inMap.Get idx
      inMap.LinkNode res data;
      res
  
  //---------------------------------------------------------------------------
  
negative.code:             u_string
              u_access 
              st
      { rfield_mutable=a  
        rfield_volatile=b  
        rfield_type=c1 
        rfield_static=c2 
        rfield_secret=c2b 
        rfield_const=c3 
        rfield_id=d 
        rfield_pattribs=e1
        rfield_fattribs=e2
        rfield_xmldoc=XmlDoc.Empty
        rfield_xmldocsig=f 
        rfield_access=g
        rfield_other_range = None }
  
  