Skip to content

Commit bc3dd9f

Browse files
authored
Disable flaky transparent compiler tests (#16765)
1 parent 60e257a commit bc3dd9f

File tree

1 file changed

+10
-10
lines changed

1 file changed

+10
-10
lines changed

tests/service/ProjectAnalysisTests.fs

Lines changed: 10 additions & 10 deletions
Original file line numberDiff line numberDiff line change
@@ -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>]
46604660
let ``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>]
46774677
let ``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>]
47164716
let ``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>]
53345334
let ``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>]
54245424
let ``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>]
54685468
let ``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>]
55435543
let ``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>]
56185618
let ``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>]
56935693
let ``Unused opens smoke test auto open`` useTransparentCompiler =
56945694

@@ -5861,4 +5861,4 @@ module internal EmptyProject =
58615861
let ``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

Comments
 (0)