anchor.diff:      let isResolvedAndFSharp() = 
           match entity with
           | ERefNonLocal(NonLocalEntityRef(ccu, _)) -> not ccu.IsUnresolvedReference && ccu.IsFSharp
  -        | _ -> 
  -            let ccu = defaultArg (ItemDescriptionsImpl.ccuOfItem cenv.g (getItem entity)) cenv.thisCcu 
  -            ccu.IsFSharp
  +        | _ -> cenv.thisCcu.IsFSharp
   
       let isUnresolved() = entityIsUnresolved entity
       let isResolved() = not (isUnresolved())
  
positive.code:         match ItemDescriptionsImpl.GetXmlDocSigOfEntityRef cenv.infoReader ent.Range ent with
          | Some (_, docsig) -> docsig
          | _ -> ""
          
      let getItem (ent:EntityRef) =
          checkEntityIsResolved(ent)
          if ent.IsModule then Item.ModuleOrNamespaces [ent] 
          else Item.UnqualifiedType [ent]
  
  type FSharpDisplayContext(denv: TcGlobals -> DisplayEnv) = 
      member x.Contents(g) = denv(g)
  
negative.code: 
  and FSharpEntity(cenv:cenv, entity:EntityRef) = 
      inherit FSharpSymbol(cenv,  
                           (fun () -> 
                                checkEntityIsResolved(entity); 
                                if entity.IsModule then Item.ModuleOrNamespaces [entity] 
                                else Item.UnqualifiedType [entity]), 
                           (fun _this thisCcu2 ad -> 
                               checkForCrossProjectAccessibility (thisCcu2, ad) (cenv.thisCcu, getApproxFSharpAccessibilityOfEntity entity)) 
                               // && AccessibilityLogic.IsEntityAccessible cenv.amap range0 ad entity)
  