anchor.diff:  #endif
   
   /// Lookup a type name in an entity.
  -let LookupTypeNameInEntityMaybeHaveArity (amap, m, nm, staticResInfo:TypeNameResolutionStaticArgsInfo, modref: ModuleOrNamespaceRef) = 
  +let LookupTypeNameInEntityMaybeHaveArity (amap, m, ad, nm, staticResInfo:TypeNameResolutionStaticArgsInfo, modref: ModuleOrNamespaceRef) = 
       let mtyp = modref.ModuleOrNamespaceType    
       let tcrefs = 
           match staticResInfo with 
  
positive.code: #else
      amap |> ignore
  #endif
      tcrefs
  
  
  
negative.code:     | [] -> error(Error(FSComp.SR.nrUnexpectedEmptyLongId(),m))
      | [id] -> 
          // On all paths except error reporting we have isSome(staticResInfo), hence get at most one result back 
          let tcrefs = LookupTypeNameInEntityMaybeHaveArity (ncenv.amap, id.idRange, ad, id.idText, typeNameResInfo.StaticArgsInfo, modref)
          match tcrefs with 
          | _ :: _ -> tcrefs |> CollectResults (fun tcref -> success(resInfo,tcref))
          | [] -> raze (SuggestTypeLongIdentInModuleOrNamespace depth modref id)
  