anchor.diff:   
       member __.XmlDocSig = 
           checkIsResolved()
  -        getXmlDocSigOfEntityRef g tcImports entity 
  -
  +        getXmlDocSigForEntity g tcImports entity
  + 
       member __.XmlDoc = 
           if isUnresolved() then XmlDoc.Empty  |> makeXmlDoc else
           entity.XmlDoc |> makeXmlDoc
  
positive.code: 
      member __.XmlDocSig = 
          checkIsResolved()
          getXmlDocSigOfUnionCaseInfo v.TyconRef v.UnionCase
  
      member __.XmlDoc = 
          if isUnresolved() then XmlDoc.Empty  |> makeXmlDoc else
  
negative.code:             cpaths2 |> List.exists (canAccessFromCrossProject taccess1) 
          | _ -> true // otherwise use the normal check
  
      let getXmlDocSigForEntity g (tcImports:TcImports) (ent:EntityRef)=
          let amap = tcImports.GetImportMap()
          let infoReader = InfoReader(g, amap)
          match ItemDescriptionsImpl.GetXmlDocSigOfEntityRef infoReader ent.Range ent with
          | Some (_, docsig) -> docsig
          | _ -> ""
  
  type FSharpDisplayContext(denv: TcGlobals -> DisplayEnv) = 
      member x.Contents(g) = denv(g)
  