Some

dotnet · Dec 20, 2024 · 703a31b · 703a31b
1 parent 6eed52a
commit 703a31b
Show file tree

Hide file tree

Showing 107 changed files with 164 additions and 3,111 deletions.
diff --git a/...harp.Compiler.ComponentTests/EmittedIL/AsyncExpressionStepping/AsyncExpressionStepping.fs b/...harp.Compiler.ComponentTests/EmittedIL/AsyncExpressionStepping/AsyncExpressionStepping.fs
@@ -17,74 +17,38 @@ module AsyncExpressionStepping =
         |> verifyBaseline
         |> verifyILBaseline
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[|"AsyncExpressionSteppingTest1.fs"|])>]
-    let ``AsyncExpressionSteppingTest1_RealInternalSignatureOn_fs`` compilation =
+    [<Theory; FileInlineData("AsyncExpressionSteppingTest1.fs", Realsig=BooleanOptions.Both)>]
+    let ``AsyncExpressionSteppingTest1_fs`` compilation =
         compilation
-        |> withRealInternalSignatureOn
+        |> getCompilation
         |> verifyCompilation
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[|"AsyncExpressionSteppingTest1.fs"|])>]
-    let ``AsyncExpressionSteppingTest1_RealInternalSignatureOff_fs`` compilation =
+    [<Theory; FileInlineData("AsyncExpressionSteppingTest2.fs", Realsig=BooleanOptions.Both)>]
+    let ``AsyncExpressionSteppingTest2`` compilation =
         compilation
-        |> withRealInternalSignatureOff
+        |> getCompilation
         |> verifyCompilation
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[|"AsyncExpressionSteppingTest2.fs"|])>]
-    let ``AsyncExpressionSteppingTest2_RealInternalSignatureOnfs`` compilation =
+    [<Theory; FileInlineData("AsyncExpressionSteppingTest3.fs", Realsig=BooleanOptions.Both)>]
+    let ``AsyncExpressionSteppingTest3_fs`` compilation =
         compilation
-        |> withRealInternalSignatureOn
+        |> getCompilation
         |> verifyCompilation
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[|"AsyncExpressionSteppingTest2.fs"|])>]
-    let ``AsyncExpressionSteppingTest2_RealInternalSignatureOff_fs`` compilation =
+    [<Theory; FileInlineData("AsyncExpressionSteppingTest4.fs", Realsig=BooleanOptions.Both)>]
+    let ``AsyncExpressionSteppingTest4_fs`` compilation =
         compilation
-        |> withRealInternalSignatureOff
+        |> getCompilation
         |> verifyCompilation
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[|"AsyncExpressionSteppingTest3.fs"|])>]
-    let ``AsyncExpressionSteppingTest3_RealInternalSignatureOn_fs`` compilation =
+    [<Theory; FileInlineData("AsyncExpressionSteppingTest5.fs", Realsig=BooleanOptions.Both)>]
+    let ``AsyncExpressionSteppingTest5_fs`` compilation =
         compilation
-        |> withRealInternalSignatureOn
+        |> getCompilation
         |> verifyCompilation
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[|"AsyncExpressionSteppingTest3.fs"|])>]
-    let ``AsyncExpressionSteppingTest3_RealInternalSignatureOff_fs`` compilation =
+    [<Theory; FileInlineData("AsyncExpressionSteppingTest6.fs", Realsig=BooleanOptions.Both)>]
+    let ``AsyncExpressionSteppingTest6_fs`` compilation =
         compilation
-        |> withRealInternalSignatureOff
-        |> verifyCompilation
-
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[|"AsyncExpressionSteppingTest4.fs"|])>]
-    let ``AsyncExpressionSteppingTest4_RealInternalSignatureOn_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOn
-        |> verifyCompilation
-
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[|"AsyncExpressionSteppingTest4.fs"|])>]
-    let ``AsyncExpressionSteppingTest4_RealInternalSignatureOff_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOff
-        |> verifyCompilation
-
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[|"AsyncExpressionSteppingTest5.fs"|])>]
-    let ``AsyncExpressionSteppingTest5_RealInternalSignatureOn_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOn
-        |> verifyCompilation
-
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[|"AsyncExpressionSteppingTest5.fs"|])>]
-    let ``AsyncExpressionSteppingTest5_RealInternalSignatureOff_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOff
-        |> verifyCompilation
-
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[|"AsyncExpressionSteppingTest6.fs"|])>]
-    let ``AsyncExpressionSteppingTest6_RealInternalSignatureOn_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOn
-        |> verifyCompilation
-
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[|"AsyncExpressionSteppingTest6.fs"|])>]
-    let ``AsyncExpressionSteppingTest6_RealInternalSignatureOff_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOff
+        |> getCompilation
         |> verifyCompilation
diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/AttributeTargets/AttributeTargets.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/AttributeTargets/AttributeTargets.fs
@@ -17,38 +17,20 @@ module AttributeTargets =
         |> verifyBaseline
         |> verifyILBaseline
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[|"Default.fs"|])>]
-    let ``Default_RealInternalSignatureOn_fs`` compilation =
+    [<Theory; FileInlineData("Default.fs", Realsig=BooleanOptions.Both)>]
+    let ``Default_fs`` compilation =
         compilation
-        |> withRealInternalSignatureOn
+        |> getCompilation
         |> verifyCompilation
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[|"Default.fs"|])>]
-    let ``Default_RealInternalSignatureOff_fs`` compilation =
+    [<Theory; FileInlineData("Field.fs", Realsig=BooleanOptions.Both)>]
+    let ``Field_fs`` compilation =
         compilation
-        |> withRealInternalSignatureOff
+        |> getCompilation
         |> verifyCompilation
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[|"Field.fs"|])>]
-    let ``Field_RealInternalSignatureOn_fs`` compilation =
+    [<Theory; FileInlineData("Property.fs", Realsig=BooleanOptions.Both)>]
+    let ``Property_fs`` compilation =
         compilation
-        |> withRealInternalSignatureOn
-        |> verifyCompilation
-
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[|"Field.fs"|])>]
-    let ``Field_RealInternalSignatureOff_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOff
-        |> verifyCompilation
-
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[|"Property.fs"|])>]
-    let ``Property_RealInternalSignatureOn_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOn
-        |> verifyCompilation
-
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[|"Property.fs"|])>]
-    let ``Property_RealInternalSignatureOff_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOff
+        |> getCompilation
         |> verifyCompilation
diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/CCtorDUWithMember/CCtorDUWithMember.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/CCtorDUWithMember/CCtorDUWithMember.fs
@@ -17,74 +17,38 @@ module CCtorDUWithMember =
         |> verifyBaseline
         |> verifyILBaseline
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[|"CCtorDUWithMember01a.fs"|])>]
-    let ``CCtorDUWithMember01a_RealInternalSignatureOn_fs`` compilation =
+    [<Theory; FileInlineData("CCtorDUWithMember01a.fs", Realsig=BooleanOptions.Both)>]
+    let ``CCtorDUWithMember01a_fs`` compilation =
         compilation
+        |> getCompilation
         |> asFs
-        |> withRealInternalSignatureOn
         |> withAdditionalSourceFile (SourceFromPath (__SOURCE_DIRECTORY__ ++ "CCtorDUWithMember01.fs"))
         |> verifyCompilation 
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[|"CCtorDUWithMember01a.fs"|])>]
-    let ``CCtorDUWithMember01a_RealInternalSignatureOff_fs`` compilation =
+    [<Theory; FileInlineData("CCtorDUWithMember02a.fs", Realsig=BooleanOptions.Both)>]
+    let ``CCtorDUWithMember02a_fs`` compilation =
         compilation
-        |> asFs
-        |> withRealInternalSignatureOff
-        |> withAdditionalSourceFile (SourceFromPath (__SOURCE_DIRECTORY__ ++ "CCtorDUWithMember01.fs"))
-        |> verifyCompilation 
-
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[|"CCtorDUWithMember02a.fs"|])>]
-    let ``CCtorDUWithMember02a_RealInternalSignatureOn_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOn
+        |> getCompilation
         |> asFs
         |> withAdditionalSourceFile (SourceFromPath (__SOURCE_DIRECTORY__ ++ "CCtorDUWithMember02.fs"))
         |> verifyCompilation
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[|"CCtorDUWithMember02a.fs"|])>]
-    let ``CCtorDUWithMember02a_RealInternalSignatureOff_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOff
-        |> asFs
-        |> withAdditionalSourceFile (SourceFromPath (__SOURCE_DIRECTORY__ ++ "CCtorDUWithMember02.fs"))
-        |> verifyCompilation
-
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[|"CCtorDUWithMember03a.fs"|])>]
-    let ``CCtorDUWithMember03a_RealInternalSignatureOn_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOn
-        |> asFs
-        |> withAdditionalSourceFile (SourceFromPath (__SOURCE_DIRECTORY__ ++ "CCtorDUWithMember03.fs"))
-        |> verifyCompilation
-
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[|"CCtorDUWithMember03a.fs"|])>]
-    let ``CCtorDUWithMember03a_RealInternalSignatureOff_fs`` compilation =
+    [<Theory; FileInlineData("CCtorDUWithMember03a.fs", Realsig=BooleanOptions.Both)>]
+    let ``CCtorDUWithMember03a_fs`` compilation =
         compilation
-        |> withRealInternalSignatureOff
+        |> getCompilation
         |> asFs
         |> withAdditionalSourceFile (SourceFromPath (__SOURCE_DIRECTORY__ ++ "CCtorDUWithMember03.fs"))
         |> verifyCompilation
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOn", Includes=[| "CCtorDUWithMember04a.fs" |])>]
-    let ``CCtorDUWithMember04a_RealInternalSignatureOn_fs`` compilation =
+    [<Theory; FileInlineData("CCtorDUWithMember04a.fs", Realsig=BooleanOptions.Both)>]
+    let ``CCtorDUWithMember04a_fs`` compilation =
         compilation
-        |> withRealInternalSignatureOn
+        |> getCompilation
         |> asFs
         |> withAdditionalSourceFile (SourceFromPath (__SOURCE_DIRECTORY__ ++ "CCtorDUWithMember04.fs"))
         |> verifyCompilation 
 
-    [<Theory; Directory(__SOURCE_DIRECTORY__, BaselineSuffix=".RealInternalSignatureOff", Includes=[| "CCtorDUWithMember04a.fs" |])>]
-    let ``CCtorDUWithMember04a_RealInternalSignatureOff_fs`` compilation =
-        compilation
-        |> withRealInternalSignatureOff
-        |> asFs
-        |> withAdditionalSourceFile (SourceFromPath (__SOURCE_DIRECTORY__ ++ "CCtorDUWithMember04.fs"))
-        |> verifyCompilation 
-
-    let withRealInternalSignature realSig compilation =
-        compilation
-        |> withOptions [if realSig then "--realsig+" else "--realsig-" ]
-
     [<InlineData(true)>]        // RealSig
     [<InlineData(false)>]       // Regular
     [<Theory>]

diff --git a/...s/FSharp.Compiler.ComponentTests/EmittedIL/CompiledNameAttribute/CompiledNameAttribute.fs b/...s/FSharp.Compiler.ComponentTests/EmittedIL/CompiledNameAttribute/CompiledNameAttribute.fs
@@ -36,20 +36,13 @@ module CompiledNameAttribute =
         |> getCompilation
         |> verifyCompilation
 
-    [<Theory; FileInlineData("CompiledNameAttribute04_RealInternalSignatureOn.fs")>]
+    [<Theory; FileInlineData("CompiledNameAttribute04.fs", Realsig=BooleanOptions.True)>]
     let ``CompiledNameAttribute04_RealInternalSignatureOn_fs`` compilation =
         compilation
         |> getCompilation
         |> withRealInternalSignatureOn
         |> verifyCompilation 
 
-    [<Theory; FileInlineData("CompiledNameAttribute04_RealInternalSignatureOff.fs")>]
-    let ``CompiledNameAttribute04_RealInternalSignatureOff_fs`` compilation =
-        compilation
-        |> getCompilation
-        |> withRealInternalSignatureOff
-        |> verifyCompilation 
-
     [<Theory; FileInlineData("CompiledNameAttribute05.fs")>]
     let ``CompiledNameAttribute05_fs`` compilation =
         compilation

diff --git a/...meAttribute04_RealInternalSignatureOff.fs → ...dNameAttribute/CompiledNameAttribute04.fs b/...meAttribute04_RealInternalSignatureOff.fs → ...dNameAttribute/CompiledNameAttribute04.fs
diff --git a/...ternalSignatureOff.fs.il.net472.debug.bsl → ...lInternalSignatureOff.il.net472.debug.bsl b/...ternalSignatureOff.fs.il.net472.debug.bsl → ...lInternalSignatureOff.il.net472.debug.bsl
diff --git a/...rnalSignatureOff.fs.il.net472.release.bsl → ...nternalSignatureOff.il.net472.release.bsl b/...rnalSignatureOff.fs.il.net472.release.bsl → ...nternalSignatureOff.il.net472.release.bsl
diff --git a/...ernalSignatureOff.fs.il.netcore.debug.bsl → ...InternalSignatureOff.il.netcore.debug.bsl b/...ernalSignatureOff.fs.il.netcore.debug.bsl → ...InternalSignatureOff.il.netcore.debug.bsl
diff --git a/...nalSignatureOff.fs.il.netcore.release.bsl → ...ternalSignatureOff.il.netcore.release.bsl b/...nalSignatureOff.fs.il.netcore.release.bsl → ...ternalSignatureOff.il.netcore.release.bsl
diff --git a/...ternalSignatureOn.fs.il.netcore.debug.bsl → ...ternalSignatureOn.fs.il.netcore.debug.bsl b/...ternalSignatureOn.fs.il.netcore.debug.bsl → ...ternalSignatureOn.fs.il.netcore.debug.bsl
diff --git a/...nternalSignatureOn.fs.il.net472.debug.bsl → ...alInternalSignatureOn.il.net472.debug.bsl b/...nternalSignatureOn.fs.il.net472.debug.bsl → ...alInternalSignatureOn.il.net472.debug.bsl
diff --git a/...ernalSignatureOn.fs.il.net472.release.bsl → ...InternalSignatureOn.il.net472.release.bsl b/...ernalSignatureOn.fs.il.net472.release.bsl → ...InternalSignatureOn.il.net472.release.bsl
diff --git a/...rnalSignatureOn.fs.il.netcore.release.bsl → ...nternalSignatureOn.il.netcore.release.bsl b/...rnalSignatureOn.fs.il.netcore.release.bsl → ...nternalSignatureOn.il.netcore.release.bsl
diff --git a/...tTests/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04_RealInternalSignatureOn.fs b/...tTests/EmittedIL/CompiledNameAttribute/CompiledNameAttribute04_RealInternalSignatureOn.fs