Skip to content

Commit 18a573e

Browse files
committed
Merge branch 'fix-865' of https://github.com/dsyme/visualfsharp into fix-865
2 parents e74abcf + 028c61f commit 18a573e

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

src/fsharp/vs/service.fs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1793,7 +1793,7 @@ type FSharpProjectContext(thisCcu: CcuThunk, assemblies: FSharpAssembly list, ad
17931793

17941794
[<Sealed>]
17951795
// 'details' is an option because the creation of the tcGlobals etc. for the project may have failed.
1796-
type FSharpCheckProjectResults(_keepAssemblyContents, errors: FSharpErrorInfo[], details:(TcGlobals*TcImports*CcuThunk*ModuleOrNamespaceType*TcSymbolUses list*TopAttribs option*CompileOps.IRawFSharpAssemblyData option * ILAssemblyRef * AccessorDomain * TypedAssemblyAfterOptimization option) option, reactorOps: IReactorOperations) =
1796+
type FSharpCheckProjectResults(_keepAssemblyContents, errors: FSharpErrorInfo[], details:(TcGlobals*TcImports*CcuThunk*ModuleOrNamespaceType*TcSymbolUses list*TopAttribs option*CompileOps.IRawFSharpAssemblyData option * ILAssemblyRef * AccessorDomain * TypedImplFile list option) option, reactorOps: IReactorOperations) =
17971797

17981798
let getDetails() =
17991799
match details with
@@ -1814,7 +1814,7 @@ type FSharpCheckProjectResults(_keepAssemblyContents, errors: FSharpErrorInfo[],
18141814
// let mimpls =
18151815
// match tcAssemblyExpr with
18161816
// | None -> []
1817-
// | Some (TypedAssemblyAfterOptimization mimpls) -> mimpls
1817+
// | Some mimpls -> mimpls
18181818
// FSharpAssemblyContents(tcGlobals, thisCcu, tcImports, mimpls)
18191819

18201820
// Not, this does not have to be a SyncOp, it can be called from any thread

0 commit comments

Comments
 (0)