anchor.diff:              Log.logf "WARNING: Compiler was unable to resolve %s" cref
               None
           // Member
  +        | _ when cref.[1] = ':' ->
  +            let simple = getNoNamespaceMemberName 2 noParen
  +            match tryGetTypeFromMemberName memberName with
  +            | Some typeName ->
  +                match lookupTypeCref typeName with
  +                | Some reference -> Some { reference with NiceName = simple }
  +                | None ->
  +                    Some { IsInternal = false;
  +                           ReferenceLink = sprintf "http://msdn.microsoft.com/en-us/library/%s" noParen;
  +                           NiceName = simple }
  +            | None ->
  +                Log.logf "WARNING: Assumed '%s' was a member but we cannot extract a type!" cref
  +                None
  +        // No idea
           | _ ->
  -            let simple = getNoNamespaceMemberName 2 noParen
  -            match lookupTypeCref (getTypeFromMemberName memberName) with
  -            | Some reference -> Some { reference with NiceName = simple }
  -            | None ->
  -                Some { IsInternal = false; 
  -                       ReferenceLink = sprintf "http://msdn.microsoft.com/en-us/library/%s" noParen; 
  -                       NiceName = simple }
  +            Log.logf "WARNING: Unresolved reference '%s'!" cref
  +            None
       { new IUrlHolder with
           member x.RegisterEntity entity = 
               registerEntity entity
  
positive.code:     let removeParen (memberName:string) = 
          let firstParen = memberName.IndexOf("(")
          if firstParen > 0 then memberName.Substring(0, firstParen) else memberName
      let getTypeFromMemberName (memberName : string) =
          let sub = removeParen memberName
          let lastPeriod = sub.LastIndexOf(".")
          if lastPeriod > 0 then
              memberName.Substring(0, lastPeriod)
          else failwithf "cannot get typename from member name: %s" memberName
      let getNoNamespaceMemberName keepParts (memberNameNoParen:string) =
          let splits = memberNameNoParen.Split([|'.'|])
          let noNamespaceParts =
  
negative.code:       found
      let rec registerEntity (entity: FSharpEntity) =
          let newName = nameGen (sprintf "%s.%s" entity.AccessPath entity.CompiledName)
          registeredEntities.[entity] <- newName
          let xmlsig = getXmlDocSigForType entity
          if (not (System.String.IsNullOrEmpty xmlsig)) then
              assert (xmlsig.StartsWith("T:"))
              entityLookup.[xmlsig.Substring(2)] <- entity
          for nested in entity.NestedEntities do registerEntity nested
  
      let getUrl (entity:FSharpEntity) =
  