Skip to content

Commit 206ef80

Browse files
forkidsyme
authored andcommitted
Skip AddValRefsToNameEnvWithPriority calc if vrefs are empty (#1960)
1 parent 419369b commit 206ef80

File tree

1 file changed

+2
-1
lines changed

1 file changed

+2
-1
lines changed

src/fsharp/NameResolution.fs

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -491,7 +491,8 @@ let AddFakeNameToNameEnv nm nenv item =
491491
{nenv with eUnqualifiedItems= nenv.eUnqualifiedItems.Add (nm, item) }
492492

493493
/// Add a set of F# values to the environment.
494-
let AddValRefsToNameEnvWithPriority bulkAddMode pri nenv vrefs =
494+
let AddValRefsToNameEnvWithPriority bulkAddMode pri nenv (vrefs: ValRef []) =
495+
if vrefs.Length = 0 then nenv else
495496
{nenv with eUnqualifiedItems= AddValRefsToItems bulkAddMode nenv.eUnqualifiedItems vrefs
496497
eIndexedExtensionMembers = (nenv.eIndexedExtensionMembers,vrefs) ||> Array.fold (AddValRefToExtensionMembers pri)
497498
ePatItems =

0 commit comments

Comments
 (0)