@@ -4655,7 +4655,7 @@ let callToOverload = B(5).Overload(4)
46554655 let args = mkProjectCommandLineArgs ( dllName, [])
46564656
46574657[<Test>]
4658- [<TestCase true >]
4658+ // [<TestCase true>] // Flaky, reenable when stable
46594659[<TestCase false >]
46604660let ``Test project36 FSharpMemberOrFunctionOrValue.IsBaseValue`` useTransparentCompiler =
46614661 let keepAssemblyContentsChecker = FSharpChecker.Create( keepAssemblyContents= true , useTransparentCompiler= useTransparentCompiler)
@@ -4672,7 +4672,7 @@ let ``Test project36 FSharpMemberOrFunctionOrValue.IsBaseValue`` useTransparentC
46724672 |> fun baseSymbol -> shouldEqual true baseSymbol.IsBaseValue
46734673
46744674[<Test>]
4675- [<TestCase true >]
4675+ // [<TestCase true>] // Flaky, reenable when stable
46764676[<TestCase false >]
46774677let ``Test project36 FSharpMemberOrFunctionOrValue.IsConstructorThisValue & IsMemberThisValue`` useTransparentCompiler =
46784678 let keepAssemblyContentsChecker = FSharpChecker.Create( keepAssemblyContents= true , useTransparentCompiler= useTransparentCompiler)
@@ -4711,7 +4711,7 @@ let ``Test project36 FSharpMemberOrFunctionOrValue.IsConstructorThisValue & IsMe
47114711 |> shouldEqual true
47124712
47134713[<Test>]
4714- [<TestCase true >]
4714+ // [<TestCase true>] // Flaky, reenable when stable
47154715[<TestCase false >]
47164716let ``Test project36 FSharpMemberOrFunctionOrValue.LiteralValue`` useTransparentCompiler =
47174717 let keepAssemblyContentsChecker = FSharpChecker.Create( keepAssemblyContents= true , useTransparentCompiler= useTransparentCompiler)
@@ -5329,7 +5329,7 @@ let foo (a: Foo): bool =
53295329 let options = { checker.GetProjectOptionsFromCommandLineArgs ( projFileName, args) with SourceFiles = fileNames }
53305330
53315331[<Test>]
5332- [<TestCase true >]
5332+ // [<TestCase true>] // Flaky, reenable when stable
53335333[<TestCase false >]
53345334let ``Test typed AST for struct unions`` useTransparentCompiler = // See https://github.com/fsharp/FSharp.Compiler.Service/issues/756
53355335 let keepAssemblyContentsChecker = FSharpChecker.Create( keepAssemblyContents= true , useTransparentCompiler= useTransparentCompiler)
@@ -5419,7 +5419,7 @@ let ``Test diagnostics with line directives ignored`` () =
54195419//------------------------------------------------------
54205420
54215421[<Test>]
5422- [<TestCase true >]
5422+ // [<TestCase true>] // Flaky, reenable when stable
54235423[<TestCase false >]
54245424let ``ParseAndCheckFileResults contains ImplFile list if FSharpChecker is created with keepAssemblyContent flag set to true`` useTransparentCompiler =
54255425
@@ -5463,7 +5463,7 @@ type A(i:int) =
54635463 | None -> failwith " declaration list is empty"
54645464
54655465[<Test>]
5466- [<TestCase true >]
5466+ // [<TestCase true>] // Flaky, reenable when stable
54675467[<TestCase false >]
54685468let ``TryGetRecentCheckResultsForFile called with snapshot returns cached result after ParseAndCheckFile`` useTransparentCompiler =
54695469 let fileName1 = Path.ChangeExtension( tryCreateTemporaryFileName (), " .fs" )
@@ -5538,7 +5538,7 @@ let ``#4030, Incremental builder creation warnings`` (args, errorSeverities) =
55385538//------------------------------------------------------
55395539
55405540[<Test>]
5541- [<TestCase true >]
5541+ // [<TestCase true>] // Flaky, reenable when stable
55425542[<TestCase false >]
55435543let ``Unused opens in rec module smoke test 1`` useTransparentCompiler =
55445544
@@ -5613,7 +5613,7 @@ type UseTheThings(i:int) =
56135613 unusedOpensData |> shouldEqual expected
56145614
56155615[<Test>]
5616- [<TestCase true >]
5616+ // [<TestCase true>] // Flaky, reenable when stable
56175617[<TestCase false >]
56185618let ``Unused opens in non rec module smoke test 1`` useTransparentCompiler =
56195619
@@ -5688,7 +5688,7 @@ type UseTheThings(i:int) =
56885688 unusedOpensData |> shouldEqual expected
56895689
56905690[<Test>]
5691- [<TestCase true >]
5691+ // [<TestCase true>] // Flaky, reenable when stable
56925692[<TestCase false >]
56935693let ``Unused opens smoke test auto open`` useTransparentCompiler =
56945694
@@ -5861,4 +5861,4 @@ module internal EmptyProject =
58615861let ``Empty source list produces error FS0207`` () =
58625862 let results = checker.ParseAndCheckProject( EmptyProject.options) |> Async.RunImmediate
58635863 results.Diagnostics.Length |> shouldEqual 1
5864- results.Diagnostics[ 0 ]. ErrorNumber |> shouldEqual 207
5864+ results.Diagnostics[ 0 ]. ErrorNumber |> shouldEqual 207
0 commit comments