Skip to content

Commit

Permalink
fix after rebasing
Browse files Browse the repository at this point in the history
  • Loading branch information
vasily-kirichenko committed Jul 8, 2016
1 parent ba46e87 commit 11053b7
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions src/fsharp/CompileOps.fs
Original file line number Diff line number Diff line change
Expand Up @@ -5218,7 +5218,7 @@ let TypeCheckOneInputEventually

// Typecheck the signature file
let! (tcEnvAtEnd,tcEnv,smodulTypeRoot) =
Tc.TypeCheckOneSigFile (tcGlobals,tcState.tcsNiceNameGen,amap,tcState.tcsCcu,checkForErrors,tcConfig.conditionalCompilationDefines,tcSink) tcState.tcsTcSigEnv (GetExpressionParser(tcConfig, new Lexhelp.LexResourceManager())) file
TypeCheckOneSigFile (tcGlobals,tcState.tcsNiceNameGen,amap,tcState.tcsCcu,checkForErrors,tcConfig.conditionalCompilationDefines,tcSink) tcState.tcsTcSigEnv (GetExpressionParser(tcConfig, new Lexhelp.LexResourceManager())) file

let rootSigs = Zmap.add qualNameOfFile smodulTypeRoot rootSigs

Expand Down Expand Up @@ -5248,7 +5248,7 @@ let TypeCheckOneInputEventually

// Typecheck the implementation file
let! topAttrs,implFile,tcEnvAtEnd =
Tc.TypeCheckOneImplFile (tcGlobals,tcState.tcsNiceNameGen,amap,tcState.tcsCcu,checkForErrors,tcConfig.conditionalCompilationDefines,tcSink) tcImplEnv (GetExpressionParser(tcConfig, new Lexhelp.LexResourceManager())) rootSigOpt file
TypeCheckOneImplFile (tcGlobals,tcState.tcsNiceNameGen,amap,tcState.tcsCcu,checkForErrors,tcConfig.conditionalCompilationDefines,tcSink) tcImplEnv (GetExpressionParser(tcConfig, new Lexhelp.LexResourceManager())) rootSigOpt file

let hadSig = isSome rootSigOpt
let implFileSigType = SigTypeOfImplFile implFile
Expand Down

0 comments on commit 11053b7

Please sign in to comment.