File tree Expand file tree Collapse file tree 1 file changed +3
-2
lines changed Expand file tree Collapse file tree 1 file changed +3
-2
lines changed Original file line number Diff line number Diff line change @@ -1470,6 +1470,8 @@ let CheckOneInputAux'
14701470 // printfn $"Applying Sig {file.FileName}"
14711471 let fsiPartialResult , tcState =
14721472 let rootSigs = Zmap.add qualNameOfFile sigFileType tcState.tcsRootSigs
1473+ let tcSigEnv =
1474+ AddLocalRootModuleOrNamespace TcResultsSink.NoSink tcGlobals amap m tcState.tcsTcSigEnv sigFileType
14731475
14741476 // Add the signature to the signature env (unless it had an explicit signature)
14751477 let ccuSigForFile = CombineCcuContentFragments [ sigFileType; tcState.tcsCcuSig ]
@@ -1478,8 +1480,7 @@ let CheckOneInputAux'
14781480
14791481 let tcState =
14801482 { tcState with
1481- tcsTcSigEnv = tcEnv
1482- tcsTcImplEnv = tcState.tcsTcImplEnv
1483+ tcsTcSigEnv = tcSigEnv
14831484 tcsRootSigs = rootSigs
14841485 tcsCreatesGeneratedProvidedTypes = tcState.tcsCreatesGeneratedProvidedTypes || createsGeneratedProvidedTypes
14851486 }
You can’t perform that action at this time.
0 commit comments