anchor.diff:  let p_byte b st = st.os.EmitIntAsByte b
   let p_bool b st = p_byte (if b then 1 else 0) st
   let prim_p_int32 i st = 
  -    p_byte (b0 i) st;
  -    p_byte (b1 i) st;
  -    p_byte (b2 i) st;
  +    p_byte (b0 i) st
  +    p_byte (b1 i) st
  +    p_byte (b2 i) st
       p_byte (b3 i) st
   
   /// Compress integers according to the same scheme used by CLR metadata 
  
positive.code: 
  and u_member_info st : ValMemberInfo = 
      let x2,x3,x4,x5 = u_tup4 u_tcref u_MemberFlags (u_list u_slotsig) u_bool st
      { ApparentParent=x2;
        MemberFlags=x3;
        ImplementedSlotSigs=x4;
        IsImplemented=x5  }
  
  and u_tycon_objmodel_kind st = 
  
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 }
  
  