File tree Expand file tree Collapse file tree 2 files changed +13
-1
lines changed
tests/ParallelTypeCheckingTests/Tests Expand file tree Collapse file tree 2 files changed +13
-1
lines changed Original file line number Diff line number Diff line change @@ -151,4 +151,4 @@ let ``Compile graph-based`` (project : FProject) =
151151/// Useful as a sanity check </summary>
152152[<TestCaseSource( nameof( codebases)) >]
153153let ``Compile sequential`` ( project : FProject ) =
154- compile { Method = Method.Graph ; Project = project}
154+ compile { Method = Method.Sequential ; Project = project}
Original file line number Diff line number Diff line change @@ -70,6 +70,18 @@ let internal TestCompilerFromArgs (config : Args) : unit =
7070[<TestCaseSource( nameof( codebases)) >]
7171[<Explicit( " Before running these tests, you must prepare the codebase by running FCS.prepare.ps1" ) >]
7272let ``Test graph - based type - checking`` ( code : Codebase ) =
73+ let config =
74+ {
75+ Path = code.Path
76+ LineLimit = code.Limit
77+ Method = TypeCheckingMode.Graph
78+ WorkingDir = Some code.WorkDir
79+ }
80+ TestCompilerFromArgs config
81+
82+ [<TestCaseSource( nameof( codebases)) >]
83+ [<Explicit( " Before running these tests, you must prepare the codebase by running FCS.prepare.ps1" ) >]
84+ let ``Test sequential type - checking`` ( code : Codebase ) =
7385 let config =
7486 {
7587 Path = code.Path
You can’t perform that action at this time.
0 commit comments