Skip to content

Commit

Permalink
bsl again
Browse files Browse the repository at this point in the history
  • Loading branch information
@psfinaki
psfinaki committed Mar 28, 2024
1 parent 126525c commit b0a93dd
Show file tree
Hide file tree
Showing 46 changed files with 4,581 additions and 3,790 deletions.
83 changes: 41 additions & 42 deletions ...ledNameAttribute/CompiledNameAttribute04_RealInternalSignatureOff.fs.il.netcore.debug.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -56,13 +56,11 @@
.custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationArgumentCountsAttribute::.ctor(int32[]) = ( 01 00 02 00 00 00 01 00 00 00 01 00 00 00 00 00 )
}

.method public hidebysig abstract virtual
instance int32 A2(int32 A_1) cil managed
.method public hidebysig abstract virtual instance int32 A2(int32 A_1) cil managed
{
}

.method public specialname rtspecialname
instance void .ctor() cil managed
.method public specialname rtspecialname instance void .ctor() cil managed
{

.maxstack 8
Expand All @@ -73,8 +71,7 @@
IL_0008: ret
}

.method public hidebysig specialname
instance int32 get_P() cil managed
.method public hidebysig specialname instance int32 get_P() cil managed
{

.maxstack 8
Expand All @@ -95,8 +92,7 @@
IL_0003: ret
}

.method public hidebysig instance !!a
M2<a>(!!a x) cil managed preservesig
.method public hidebysig instance !!a M2<a>(!!a x) cil managed preservesig
{

.maxstack 8
Expand All @@ -113,8 +109,7 @@
.class interface abstract auto ansi serializable nested public IInterface
{
.custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 )
.method public hidebysig abstract virtual
instance int32 SomeMethod(int32 A_1) cil managed preservesig
.method public hidebysig abstract virtual instance int32 SomeMethod(int32 A_1) cil managed preservesig
{
}

Expand All @@ -131,8 +126,7 @@
.pack 0
.size 1
.custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 )
.method public hidebysig virtual final
instance int32 CompareTo(valuetype Program/S obj) cil managed
.method public hidebysig virtual final instance int32 CompareTo(valuetype Program/S obj) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand All @@ -144,8 +138,7 @@
IL_0004: ret
}

.method public hidebysig virtual final
instance int32 CompareTo(object obj) cil managed
.method public hidebysig virtual final instance int32 CompareTo(object obj) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand Down Expand Up @@ -175,8 +168,7 @@
IL_000b: ret
}

.method public hidebysig virtual final
instance int32 GetHashCode(class [runtime]System.Collections.IEqualityComparer comp) cil managed
.method public hidebysig virtual final instance int32 GetHashCode(class [runtime]System.Collections.IEqualityComparer comp) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand All @@ -185,8 +177,7 @@
IL_0001: ret
}

.method public hidebysig virtual final
instance int32 GetHashCode() cil managed
.method public hidebysig virtual final instance int32 GetHashCode() cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand All @@ -197,47 +188,60 @@
IL_000b: ret
}

.method public hidebysig instance bool
Equals(valuetype Program/S obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

.maxstack 3
.locals init (valuetype Program/S& V_0)
IL_0000: ldarga.s obj
IL_0002: stloc.0
IL_0003: ldc.i4.1
IL_0004: ret
}

.method public hidebysig virtual final
instance bool Equals(object obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

.maxstack 3
.maxstack 5
.locals init (object V_0,
valuetype Program/S V_1,
valuetype Program/S& V_2)
valuetype Program/S V_1)
IL_0000: ldarg.1
IL_0001: stloc.0
IL_0002: ldloc.0
IL_0003: isinst Program/S
IL_0008: ldnull
IL_0009: cgt.un
IL_000b: brfalse.s IL_0019
IL_000b: brfalse.s IL_001d

IL_000d: ldarg.1
IL_000e: unbox.any Program/S
IL_0013: stloc.1
IL_0014: ldloca.s V_1
IL_0016: stloc.2
IL_0017: ldc.i4.1
IL_0018: ret
IL_0014: ldarg.0
IL_0015: ldloc.1
IL_0016: ldarg.2
IL_0017: call instance bool Program/S::Equals(valuetype Program/S,
class [runtime]System.Collections.IEqualityComparer)
IL_001c: ret

IL_0019: ldc.i4.0
IL_001a: ret
IL_001d: ldc.i4.0
IL_001e: ret
}

.method public hidebysig instance !!a
M1<a>(!!a x) cil managed preservesig
.method public hidebysig instance !!a M1<a>(!!a x) cil managed preservesig
{

.maxstack 8
IL_0000: ldarg.1
IL_0001: ret
}

.method public hidebysig virtual final
instance bool Equals(valuetype Program/S obj) cil managed
.method public hidebysig virtual final instance bool Equals(valuetype Program/S obj) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand All @@ -249,8 +253,7 @@
IL_0004: ret
}

.method public hidebysig virtual final
instance bool Equals(object obj) cil managed
.method public hidebysig virtual final instance bool Equals(object obj) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand Down Expand Up @@ -282,8 +285,7 @@
.class interface abstract auto ansi serializable nested public ITestInterface
{
.custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 03 00 00 00 00 00 )
.method public hidebysig abstract virtual
instance int32 M(int32 A_1) cil managed
.method public hidebysig abstract virtual instance int32 M(int32 A_1) cil managed
{
}

Expand All @@ -294,8 +296,7 @@
implements Program/ITestInterface
{
.custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 06 00 00 00 00 00 )
.method public specialname rtspecialname
instance void .ctor() cil managed
.method public specialname rtspecialname instance void .ctor() cil managed
{

.maxstack 8
Expand All @@ -306,8 +307,7 @@
IL_0008: ret
}

.method private hidebysig newslot virtual final
instance int32 Program.ITestInterface.M(int32 x) cil managed
.method private hidebysig newslot virtual final instance int32 Program.ITestInterface.M(int32 x) cil managed
{
.custom instance void [System.Runtime.InteropServices]System.Runtime.InteropServices.PreserveSigAttribute::.ctor() = ( 01 00 00 00 )
.override Program/ITestInterface::M
Expand Down Expand Up @@ -341,8 +341,7 @@
IL_0001: ret
}

.method public specialname static class Program/ITestInterface
get_a() cil managed
.method public specialname static class Program/ITestInterface get_a() cil managed
{

.maxstack 8
Expand Down
35 changes: 25 additions & 10 deletions ...iledNameAttribute/CompiledNameAttribute04_RealInternalSignatureOn.fs.il.netcore.debug.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -188,34 +188,49 @@
IL_000b: ret
}

.method public hidebysig instance bool
Equals(valuetype Program/S obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

.maxstack 3
.locals init (valuetype Program/S& V_0)
IL_0000: ldarga.s obj
IL_0002: stloc.0
IL_0003: ldc.i4.1
IL_0004: ret
}

.method public hidebysig virtual final
instance bool Equals(object obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

.maxstack 3
.maxstack 5
.locals init (object V_0,
valuetype Program/S V_1,
valuetype Program/S& V_2)
valuetype Program/S V_1)
IL_0000: ldarg.1
IL_0001: stloc.0
IL_0002: ldloc.0
IL_0003: isinst Program/S
IL_0008: ldnull
IL_0009: cgt.un
IL_000b: brfalse.s IL_0019
IL_000b: brfalse.s IL_001d

IL_000d: ldarg.1
IL_000e: unbox.any Program/S
IL_0013: stloc.1
IL_0014: ldloca.s V_1
IL_0016: stloc.2
IL_0017: ldc.i4.1
IL_0018: ret
IL_0014: ldarg.0
IL_0015: ldloc.1
IL_0016: ldarg.2
IL_0017: call instance bool Program/S::Equals(valuetype Program/S,
class [runtime]System.Collections.IEqualityComparer)
IL_001c: ret

IL_0019: ldc.i4.0
IL_001a: ret
IL_001d: ldc.i4.0
IL_001e: ret
}

.method public hidebysig instance !!a M1<a>(!!a x) cil managed preservesig
Expand Down
6 changes: 3 additions & 3 deletions ...s/FSharp.Compiler.ComponentTests/EmittedIL/GenericComparison/Compare05.fsx.il.netcore.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -409,9 +409,9 @@
IL_000b: ret
}

.method public hidebysig virtual final
instance bool Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/Key obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
.method public hidebysig instance bool
Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/Key obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand Down
6 changes: 3 additions & 3 deletions ...s/FSharp.Compiler.ComponentTests/EmittedIL/GenericComparison/Compare06.fsx.il.netcore.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -339,9 +339,9 @@
IL_000b: ret
}

.method public hidebysig virtual final
instance bool Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/KeyR obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
.method public hidebysig instance bool
Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/KeyR obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand Down
6 changes: 3 additions & 3 deletions ...s/FSharp.Compiler.ComponentTests/EmittedIL/GenericComparison/Compare07.fsx.il.netcore.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -420,9 +420,9 @@
IL_000b: ret
}

.method public hidebysig virtual final
instance bool Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/GenericKey`1<!a> obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
.method public hidebysig instance bool
Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/GenericKey`1<!a> obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand Down
18 changes: 9 additions & 9 deletions ...s/FSharp.Compiler.ComponentTests/EmittedIL/GenericComparison/Compare10.fsx.il.netcore.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -409,9 +409,9 @@
IL_000b: ret
}

.method public hidebysig virtual final
instance bool Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/Key obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
.method public hidebysig instance bool
Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/Key obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand Down Expand Up @@ -1015,9 +1015,9 @@
IL_000b: ret
}

.method public hidebysig virtual final
instance bool Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/KeyWithInnerKeys obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
.method public hidebysig instance bool
Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/KeyWithInnerKeys obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand Down Expand Up @@ -1051,7 +1051,7 @@
IL_001a: ldloc.2
IL_001b: ldloc.3
IL_001c: ldarg.2
IL_001d: callvirt instance bool assembly/CompareMicroPerfAndCodeGenerationTests/Key::Equals(object,
IL_001d: callvirt instance bool assembly/CompareMicroPerfAndCodeGenerationTests/Key::Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/Key,
class [runtime]System.Collections.IEqualityComparer)
IL_0022: brfalse.s IL_006d

Expand All @@ -1076,14 +1076,14 @@
IL_0056: ldloc.2
IL_0057: ldloc.s V_6
IL_0059: ldarg.2
IL_005a: callvirt instance bool assembly/CompareMicroPerfAndCodeGenerationTests/Key::Equals(object,
IL_005a: callvirt instance bool assembly/CompareMicroPerfAndCodeGenerationTests/Key::Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/Key,
class [runtime]System.Collections.IEqualityComparer)
IL_005f: brfalse.s IL_006b

IL_0061: ldloc.3
IL_0062: ldloc.s V_7
IL_0064: ldarg.2
IL_0065: callvirt instance bool assembly/CompareMicroPerfAndCodeGenerationTests/Key::Equals(object,
IL_0065: callvirt instance bool assembly/CompareMicroPerfAndCodeGenerationTests/Key::Equals(class assembly/CompareMicroPerfAndCodeGenerationTests/Key,
class [runtime]System.Collections.IEqualityComparer)
IL_006a: ret

Expand Down
6 changes: 3 additions & 3 deletions tests/FSharp.Compiler.ComponentTests/EmittedIL/GenericComparison/Equals04.fsx.il.netcore.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -409,9 +409,9 @@
IL_000b: ret
}

.method public hidebysig virtual final
instance bool Equals(class assembly/EqualsMicroPerfAndCodeGenerationTests/Key obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
.method public hidebysig instance bool
Equals(class assembly/EqualsMicroPerfAndCodeGenerationTests/Key obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand Down
6 changes: 3 additions & 3 deletions tests/FSharp.Compiler.ComponentTests/EmittedIL/GenericComparison/Equals05.fsx.il.netcore.bsl
View file
Original file line number Diff line number Diff line change
Expand Up @@ -339,9 +339,9 @@
IL_000b: ret
}

.method public hidebysig virtual final
instance bool Equals(class assembly/EqualsMicroPerfAndCodeGenerationTests/KeyR obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
.method public hidebysig instance bool
Equals(class assembly/EqualsMicroPerfAndCodeGenerationTests/KeyR obj,
class [runtime]System.Collections.IEqualityComparer comp) cil managed
{
.custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 )

Expand Down
Loading

0 comments on commit b0a93dd

Please sign in to comment.