Skip to content

Commit c751673

Browse files
committed
first try using TryLinkVal in F# member resolve from IL
1 parent 1056c03 commit c751673

File tree

1 file changed

+4
-0
lines changed

1 file changed

+4
-0
lines changed

src/fsharp/vs/Exprs.fs

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -718,6 +718,10 @@ module FSharpExprConvert =
718718
with _ ->
719719
failwithf "Failed to resolve type '%s'" (nlr.EnclosingEntity.CompiledName)
720720
let ccu = nlr.EnclosingEntity.nlr.Ccu
721+
let possible = e.ModuleOrNamespaceType.TryLinkVal(ccu, nlr.ItemKey)
722+
match possible with
723+
| Some _ -> makeFSCall isMember vr
724+
| None ->
721725
let vName = nlr.ItemKey.PartialKey.LogicalName // this is actually compiled name
722726
let findByName =
723727
e.MembersOfFSharpTyconSorted |> List.filter (fun v -> v.CompiledName = vName)

0 commit comments

Comments
 (0)