Skip to content

Commit

Permalink
Fix build
Browse files Browse the repository at this point in the history
  • Loading branch information
safesparrow committed Nov 10, 2022
1 parent 59784a4 commit a1fd757
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 6 deletions.
6 changes: 3 additions & 3 deletions src/Compiler/Driver/ParseAndCheckInputs.fs
Original file line number Diff line number Diff line change
Expand Up @@ -1471,8 +1471,8 @@ let CheckOneInputAux'
let tcSigEnv =
AddLocalRootModuleOrNamespace TcResultsSink.NoSink tcGlobals amap m tcState.tcsTcSigEnv sigFileType

// Add the signature to the signature env (unless it had an explicit signature)
let ccuSigForFile = CombineCcuContentFragments [ sigFileType; tcState.tcsCcuSig ]
// Add the signature to the signature env (unless it had an explicit signature)
let ccuSigForFile = CombineCcuContentFragments [ sigFileType; tcState.tcsCcuSig ]

let partialResult = tcEnv, EmptyTopAttrs, None, ccuSigForFile

Expand All @@ -1484,7 +1484,7 @@ let CheckOneInputAux'
}
partialResult, tcState

fsiPartialResult, tcState
fsiPartialResult, tcState

| ParsedInput.ImplFile file ->
// printfn $"Processing Impl {file.FileName}"
Expand Down
3 changes: 0 additions & 3 deletions tests/ParallelTypeCheckingTests/Tests/TestCompilation.fs
Original file line number Diff line number Diff line change
Expand Up @@ -194,9 +194,6 @@ let d (c: CType) =
emptyNamespace
dependentSignatures
]
|> FProject.Make CompileOutput.Library

let all = [ encodeDecodeSimple; diamondBroken1; fsFsi; emptyNamespace ]

type Case =
{
Expand Down

0 comments on commit a1fd757

Please sign in to comment.