From 7b0586c89f8ceffe72e6c78a4a430648f45a7b27 Mon Sep 17 00:00:00 2001 From: Brian Rourke Boll Date: Mon, 13 May 2024 14:56:43 -0400 Subject: [PATCH] Consolidate emitted IL `for`-loop tests (#17128) * Consolidate emitted IL `for`-loop tests * The test sources and baselines for these were duplicated in #15484 to test the realsig feature, but that meant that the test _sources_ needed to be kept in sync by hand. This change uses the approach used in #16795 instead: it reuses the same test _source_ files and just adds duplicate _tests_ to check the emitted IL with realsig+. * Update netfx baselines * Fix find/replace bug * Unify netstandard assembly version in IL * Re-update baselines --------- Co-authored-by: Kevin Ransom (msft) --- .../ForEachOnArray01.fs | 0 ...rray01.fs.RealInternalSignatureOff.il.bsl} | 0 ...Array01.fs.RealInternalSignatureOn.il.bsl} | 0 .../ForEachOnList01.fs | 0 ...List01.fs.RealInternalSignatureOff.il.bsl} | 18 +- ...nList01.fs.RealInternalSignatureOn.il.bsl} | 18 +- .../ForEachOnString01.fs | 0 ...ring01.fs.RealInternalSignatureOff.il.bsl} | 18 +- ...tring01.fs.RealInternalSignatureOn.il.bsl} | 18 +- .../ForEachRangeStepByte.fs | 0 ...te.fs.RealInternalSignatureOff.opt.il.bsl} | 0 ...yte.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../ForEachRangeStepChar.fs | 0 ...ar.fs.RealInternalSignatureOff.opt.il.bsl} | 0 ...har.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../ForEachRangeStepInt16.fs | 0 ...16.fs.RealInternalSignatureOff.opt.il.bsl} | 0 ...t16.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../ForEachRangeStepInt32.fs | 0 ...32.fs.RealInternalSignatureOff.opt.il.bsl} | 0 ...t32.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../ForEachRangeStepInt64.fs | 0 ...64.fs.RealInternalSignatureOff.opt.il.bsl} | 0 ...t64.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../ForEachRangeStepIntPtr.fs | 0 ...tr.fs.RealInternalSignatureOff.opt.il.bsl} | 0 ...Ptr.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../ForEachRangeStepSByte.fs | 0 ...te.fs.RealInternalSignatureOff.opt.il.bsl} | 0 ...yte.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../ForEachRangeStepUInt16.fs | 0 ...16.fs.RealInternalSignatureOff.opt.il.bsl} | 0 ...t16.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../ForEachRangeStepUInt32.fs | 0 ...32.fs.RealInternalSignatureOff.opt.il.bsl} | 0 ...t32.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../ForEachRangeStepUInt64.fs | 0 ...64.fs.RealInternalSignatureOff.opt.il.bsl} | 0 ...t64.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../ForEachRangeStepUIntPtr.fs | 0 ...tr.fs.RealInternalSignatureOff.opt.il.bsl} | 0 ...Ptr.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../ForEachRangeStep_UnitsOfMeasure.fs | 0 ...re.fs.RealInternalSignatureOff.opt.il.bsl} | 0 ...ure.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../EmittedIL/ForLoop/ForLoop.fs | 483 +++++++++++++++ .../NoAllocationOfTuple01.fs | 0 ...uple01.fs.RealInternalSignatureOff.il.bsl} | 0 ...Tuple01.fs.RealInternalSignatureOn.il.bsl} | 0 .../NoIEnumerable01.fsx | 0 ...ble01.fsx.RealInternalSignatureOff.il.bsl} | 0 ...able01.fsx.RealInternalSignatureOn.il.bsl} | 0 .../NoIEnumerable02.fsx | 0 ...ble02.fsx.RealInternalSignatureOff.il.bsl} | 0 ...able02.fsx.RealInternalSignatureOn.il.bsl} | 0 .../NoIEnumerable03.fsx | 0 ...ble03.fsx.RealInternalSignatureOff.il.bsl} | 0 ...able03.fsx.RealInternalSignatureOn.il.bsl} | 0 .../NonTrivialBranchingBindingInEnd01.fs | 0 ...nEnd01.fs.RealInternalSignatureOff.il.bsl} | 6 +- ...01.fs.RealInternalSignatureOff.opt.il.bsl} | 6 +- ...InEnd01.fs.RealInternalSignatureOn.il.bsl} | 0 ...d01.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../NonTrivialBranchingBindingInEnd02.fs | 0 ...nEnd02.fs.RealInternalSignatureOff.il.bsl} | 6 +- ...02.fs.RealInternalSignatureOff.opt.il.bsl} | 6 +- ...InEnd02.fs.RealInternalSignatureOn.il.bsl} | 0 ...d02.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../NonTrivialBranchingBindingInEnd03.fs | 0 ...nEnd03.fs.RealInternalSignatureOff.il.bsl} | 146 +++-- ...03.fs.RealInternalSignatureOff.opt.il.bsl} | 146 +++-- ...InEnd03.fs.RealInternalSignatureOn.il.bsl} | 0 ...d03.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../NonTrivialBranchingBindingInEnd04.fs | 0 ...nEnd04.fs.RealInternalSignatureOff.il.bsl} | 186 +++--- ...04.fs.RealInternalSignatureOff.opt.il.bsl} | 186 +++--- ...InEnd04.fs.RealInternalSignatureOn.il.bsl} | 0 ...d04.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../NonTrivialBranchingBindingInEnd05.fs | 0 ...nEnd05.fs.RealInternalSignatureOff.il.bsl} | 6 +- ...05.fs.RealInternalSignatureOff.opt.il.bsl} | 6 +- ...InEnd05.fs.RealInternalSignatureOn.il.bsl} | 0 ...d05.fs.RealInternalSignatureOn.opt.il.bsl} | 0 .../ForEachOnList01.fs.il.net472.debug.bsl | 465 -------------- .../ForEachOnList01.fs.il.net472.release.bsl | 485 --------------- .../ForEachOnList01.fs.il.netcore.debug.bsl | 465 -------------- .../ForEachOnString01.fs.il.net472.debug.bsl | 556 ----------------- ...ForEachOnString01.fs.il.net472.release.bsl | 571 ------------------ .../ForEachOnString01.fs.il.netcore.debug.bsl | 556 ----------------- .../RealInternalSignatureOff/ForLoop.fs | 216 ------- .../NoIEnumerable01.fsx.il.net472.debug.bsl | 96 --- .../NoIEnumerable01.fsx.il.net472.release.bsl | 106 ---- .../NoIEnumerable01.fsx.il.netcore.debug.bsl | 96 --- .../NoIEnumerable02.fsx.il.net472.debug.bsl | 96 --- .../NoIEnumerable02.fsx.il.net472.release.bsl | 106 ---- .../NoIEnumerable02.fsx.il.netcore.debug.bsl | 96 --- .../NoIEnumerable03.fsx.il.net472.debug.bsl | 98 --- .../NoIEnumerable03.fsx.il.net472.release.bsl | 108 ---- .../NoIEnumerable03.fsx.il.netcore.debug.bsl | 98 --- .../ForEachOnArray01.fs | 8 - .../ForEachOnList01.fs | 51 -- .../ForEachOnList01.fs.il.net472.debug.bsl | 465 -------------- .../ForEachOnList01.fs.il.net472.release.bsl | 485 --------------- .../ForEachOnList01.fs.il.netcore.debug.bsl | 465 -------------- .../ForEachOnString01.fs | 67 -- .../ForEachOnString01.fs.il.net472.debug.bsl | 556 ----------------- ...ForEachOnString01.fs.il.net472.release.bsl | 571 ------------------ .../ForEachOnString01.fs.il.netcore.debug.bsl | 556 ----------------- .../ForEachRangeStepByte.fs | 57 -- .../ForEachRangeStepChar.fs | 57 -- .../ForEachRangeStepInt16.fs | 65 -- .../ForEachRangeStepInt32.fs | 65 -- .../ForEachRangeStepInt64.fs | 65 -- .../ForEachRangeStepIntPtr.fs | 65 -- .../ForEachRangeStepSByte.fs | 65 -- .../ForEachRangeStepUInt16.fs | 57 -- .../ForEachRangeStepUInt32.fs | 57 -- .../ForEachRangeStepUInt64.fs | 57 -- .../ForEachRangeStepUIntPtr.fs | 57 -- .../ForEachRangeStep_UnitsOfMeasure.fs | 47 -- .../RealInternalSignatureOn/ForLoop.fs | 220 ------- .../NoAllocationOfTuple01.fs | 11 - .../NoIEnumerable01.fsx | 8 - .../NoIEnumerable01.fsx.il.net472.debug.bsl | 96 --- .../NoIEnumerable01.fsx.il.net472.release.bsl | 106 ---- .../NoIEnumerable01.fsx.il.netcore.debug.bsl | 96 --- .../NoIEnumerable02.fsx | 8 - .../NoIEnumerable02.fsx.il.net472.debug.bsl | 96 --- .../NoIEnumerable02.fsx.il.net472.release.bsl | 106 ---- .../NoIEnumerable02.fsx.il.netcore.debug.bsl | 96 --- .../NoIEnumerable03.fsx | 9 - .../NoIEnumerable03.fsx.il.net472.debug.bsl | 98 --- .../NoIEnumerable03.fsx.il.net472.release.bsl | 108 ---- .../NoIEnumerable03.fsx.il.netcore.debug.bsl | 98 --- .../NonTrivialBranchingBindingInEnd01.fs | 12 - .../NonTrivialBranchingBindingInEnd02.fs | 12 - .../NonTrivialBranchingBindingInEnd03.fs | 11 - .../NonTrivialBranchingBindingInEnd04.fs | 11 - .../NonTrivialBranchingBindingInEnd05.fs | 12 - .../ZeroToArrLength01.fs | 7 - .../ZeroToArrLength02.fs | 7 - .../ZeroToArrLength01.fs | 0 ...ngth01.fs.RealInternalSignatureOff.il.bsl} | 0 ...ength01.fs.RealInternalSignatureOn.il.bsl} | 0 .../ZeroToArrLength02.fs | 0 ...ngth02.fs.RealInternalSignatureOff.il.bsl} | 0 ...ength02.fs.RealInternalSignatureOn.il.bsl} | 0 .../FSharp.Compiler.ComponentTests.fsproj | 3 +- tests/FSharp.Test.Utilities/ILChecker.fs | 11 +- 149 files changed, 943 insertions(+), 9706 deletions(-) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachOnArray01.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachOnArray01.fs.il.bsl => ForEachOnArray01.fs.RealInternalSignatureOff.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachOnArray01.fs.il.bsl => ForEachOnArray01.fs.RealInternalSignatureOn.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachOnList01.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachOnList01.fs.il.netcore.release.bsl => ForEachOnList01.fs.RealInternalSignatureOff.il.bsl} (98%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachOnList01.fs.il.netcore.release.bsl => ForEachOnList01.fs.RealInternalSignatureOn.il.bsl} (98%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachOnString01.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachOnString01.fs.il.netcore.release.bsl => ForEachOnString01.fs.RealInternalSignatureOff.il.bsl} (97%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachOnString01.fs.il.netcore.release.bsl => ForEachOnString01.fs.RealInternalSignatureOn.il.bsl} (97%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachRangeStepByte.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachRangeStepByte.fs.opt.il.bsl => ForEachRangeStepByte.fs.RealInternalSignatureOff.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachRangeStepByte.fs.opt.il.bsl => ForEachRangeStepByte.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachRangeStepChar.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachRangeStepChar.fs.opt.il.bsl => ForEachRangeStepChar.fs.RealInternalSignatureOff.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachRangeStepChar.fs.opt.il.bsl => ForEachRangeStepChar.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachRangeStepInt16.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachRangeStepInt16.fs.opt.il.bsl => ForEachRangeStepInt16.fs.RealInternalSignatureOff.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachRangeStepInt16.fs.opt.il.bsl => ForEachRangeStepInt16.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachRangeStepInt32.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachRangeStepInt32.fs.opt.il.bsl => ForEachRangeStepInt32.fs.RealInternalSignatureOff.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachRangeStepInt32.fs.opt.il.bsl => ForEachRangeStepInt32.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachRangeStepInt64.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachRangeStepInt64.fs.opt.il.bsl => ForEachRangeStepInt64.fs.RealInternalSignatureOff.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachRangeStepInt64.fs.opt.il.bsl => ForEachRangeStepInt64.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachRangeStepIntPtr.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachRangeStepIntPtr.fs.opt.il.bsl => ForEachRangeStepIntPtr.fs.RealInternalSignatureOff.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachRangeStepIntPtr.fs.opt.il.bsl => ForEachRangeStepIntPtr.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachRangeStepSByte.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachRangeStepSByte.fs.opt.il.bsl => ForEachRangeStepSByte.fs.RealInternalSignatureOff.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachRangeStepSByte.fs.opt.il.bsl => ForEachRangeStepSByte.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachRangeStepUInt16.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachRangeStepUInt16.fs.opt.il.bsl => ForEachRangeStepUInt16.fs.RealInternalSignatureOff.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachRangeStepUInt16.fs.opt.il.bsl => ForEachRangeStepUInt16.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachRangeStepUInt32.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachRangeStepUInt32.fs.opt.il.bsl => ForEachRangeStepUInt32.fs.RealInternalSignatureOff.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachRangeStepUInt32.fs.opt.il.bsl => ForEachRangeStepUInt32.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachRangeStepUInt64.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachRangeStepUInt64.fs.opt.il.bsl => ForEachRangeStepUInt64.fs.RealInternalSignatureOff.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachRangeStepUInt64.fs.opt.il.bsl => ForEachRangeStepUInt64.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachRangeStepUIntPtr.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachRangeStepUIntPtr.fs.opt.il.bsl => ForEachRangeStepUIntPtr.fs.RealInternalSignatureOff.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachRangeStepUIntPtr.fs.opt.il.bsl => ForEachRangeStepUIntPtr.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ForEachRangeStep_UnitsOfMeasure.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ForEachRangeStep_UnitsOfMeasure.fs.opt.il.bsl => ForEachRangeStep_UnitsOfMeasure.fs.RealInternalSignatureOff.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ForEachRangeStep_UnitsOfMeasure.fs.opt.il.bsl => ForEachRangeStep_UnitsOfMeasure.fs.RealInternalSignatureOn.opt.il.bsl} (100%) create mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForLoop.fs rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/NoAllocationOfTuple01.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NoAllocationOfTuple01.fs.il.bsl => NoAllocationOfTuple01.fs.RealInternalSignatureOff.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NoAllocationOfTuple01.fs.il.bsl => NoAllocationOfTuple01.fs.RealInternalSignatureOn.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/NoIEnumerable01.fsx (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NoIEnumerable01.fsx.il.netcore.release.bsl => NoIEnumerable01.fsx.RealInternalSignatureOff.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NoIEnumerable01.fsx.il.netcore.release.bsl => NoIEnumerable01.fsx.RealInternalSignatureOn.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/NoIEnumerable02.fsx (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NoIEnumerable02.fsx.il.netcore.release.bsl => NoIEnumerable02.fsx.RealInternalSignatureOff.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NoIEnumerable02.fsx.il.netcore.release.bsl => NoIEnumerable02.fsx.RealInternalSignatureOn.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/NoIEnumerable03.fsx (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NoIEnumerable03.fsx.il.netcore.release.bsl => NoIEnumerable03.fsx.RealInternalSignatureOff.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NoIEnumerable03.fsx.il.netcore.release.bsl => NoIEnumerable03.fsx.RealInternalSignatureOn.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/NonTrivialBranchingBindingInEnd01.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NonTrivialBranchingBindingInEnd01.fs.opt.il.bsl => NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOff.il.bsl} (97%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NonTrivialBranchingBindingInEnd01.fs.il.bsl => NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOff.opt.il.bsl} (97%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NonTrivialBranchingBindingInEnd01.fs.il.bsl => NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOn.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NonTrivialBranchingBindingInEnd01.fs.opt.il.bsl => NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/NonTrivialBranchingBindingInEnd02.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NonTrivialBranchingBindingInEnd02.fs.il.bsl => NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOff.il.bsl} (97%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NonTrivialBranchingBindingInEnd02.fs.opt.il.bsl => NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOff.opt.il.bsl} (97%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NonTrivialBranchingBindingInEnd02.fs.il.bsl => NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOn.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NonTrivialBranchingBindingInEnd02.fs.opt.il.bsl => NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/NonTrivialBranchingBindingInEnd03.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NonTrivialBranchingBindingInEnd04.fs.opt.il.bsl => NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOff.il.bsl} (75%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NonTrivialBranchingBindingInEnd04.fs.il.bsl => NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOff.opt.il.bsl} (75%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NonTrivialBranchingBindingInEnd03.fs.il.bsl => NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOn.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NonTrivialBranchingBindingInEnd03.fs.opt.il.bsl => NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/NonTrivialBranchingBindingInEnd04.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NonTrivialBranchingBindingInEnd03.fs.opt.il.bsl => NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOff.il.bsl} (70%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NonTrivialBranchingBindingInEnd03.fs.il.bsl => NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOff.opt.il.bsl} (70%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NonTrivialBranchingBindingInEnd04.fs.il.bsl => NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOn.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NonTrivialBranchingBindingInEnd04.fs.opt.il.bsl => NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOn.opt.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/NonTrivialBranchingBindingInEnd05.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NonTrivialBranchingBindingInEnd05.fs.il.bsl => NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOff.il.bsl} (97%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/NonTrivialBranchingBindingInEnd05.fs.opt.il.bsl => NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOff.opt.il.bsl} (97%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NonTrivialBranchingBindingInEnd05.fs.il.bsl => NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOn.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/NonTrivialBranchingBindingInEnd05.fs.opt.il.bsl => NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOn.opt.il.bsl} (100%) delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.net472.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.net472.release.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.netcore.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.net472.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.net472.release.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.netcore.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForLoop.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.net472.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.net472.release.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.netcore.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.net472.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.net472.release.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.netcore.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.net472.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.net472.release.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.netcore.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnArray01.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.net472.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.net472.release.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.netcore.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.net472.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.net472.release.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.netcore.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepByte.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepChar.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt16.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt32.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt64.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepIntPtr.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepSByte.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt16.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt32.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt64.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUIntPtr.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStep_UnitsOfMeasure.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForLoop.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoAllocationOfTuple01.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.net472.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.net472.release.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.netcore.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.net472.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.net472.release.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.netcore.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.net472.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.net472.release.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.netcore.debug.bsl delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd01.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd02.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd03.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd04.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd05.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ZeroToArrLength01.fs delete mode 100644 tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ZeroToArrLength02.fs rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ZeroToArrLength01.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ZeroToArrLength01.fs.il.bsl => ZeroToArrLength01.fs.RealInternalSignatureOff.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ZeroToArrLength01.fs.il.bsl => ZeroToArrLength01.fs.RealInternalSignatureOn.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff => }/ZeroToArrLength02.fs (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOff/ZeroToArrLength02.fs.il.bsl => ZeroToArrLength02.fs.RealInternalSignatureOff.il.bsl} (100%) rename tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/{RealInternalSignatureOn/ZeroToArrLength02.fs.il.bsl => ZeroToArrLength02.fs.RealInternalSignatureOn.il.bsl} (100%) diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnArray01.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnArray01.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnArray01.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnArray01.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnArray01.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnArray01.fs.RealInternalSignatureOff.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnArray01.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnArray01.fs.RealInternalSignatureOff.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnArray01.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnArray01.fs.RealInternalSignatureOn.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnArray01.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnArray01.fs.RealInternalSignatureOn.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnList01.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnList01.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.netcore.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnList01.fs.RealInternalSignatureOff.il.bsl similarity index 98% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.netcore.release.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnList01.fs.RealInternalSignatureOff.il.bsl index ffb525ce929..7dad9856c8f 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.netcore.release.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnList01.fs.RealInternalSignatureOff.il.bsl @@ -52,8 +52,7 @@ extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 { .field static assembly initonly class assembly/test6@38 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed + .method assembly specialname rtspecialname instance void .ctor() cil managed { .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) @@ -64,8 +63,7 @@ IL_0006: ret } - .method public strict virtual instance int32 - Invoke(int32 x) cil managed + .method public strict virtual instance int32 Invoke(int32 x) cil managed { .maxstack 8 @@ -75,8 +73,7 @@ IL_0003: ret } - .method private specialname rtspecialname static - void .cctor() cil managed + .method private specialname rtspecialname static void .cctor() cil managed { .maxstack 10 @@ -91,8 +88,7 @@ extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 { .field static assembly initonly class assembly/test7@47 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed + .method assembly specialname rtspecialname instance void .ctor() cil managed { .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) @@ -103,8 +99,7 @@ IL_0006: ret } - .method public strict virtual instance int32 - Invoke(int32 x) cil managed + .method public strict virtual instance int32 Invoke(int32 x) cil managed { .maxstack 8 @@ -114,8 +109,7 @@ IL_0003: ret } - .method private specialname rtspecialname static - void .cctor() cil managed + .method private specialname rtspecialname static void .cctor() cil managed { .maxstack 10 diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.netcore.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnList01.fs.RealInternalSignatureOn.il.bsl similarity index 98% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.netcore.release.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnList01.fs.RealInternalSignatureOn.il.bsl index ffb525ce929..7dad9856c8f 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.netcore.release.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnList01.fs.RealInternalSignatureOn.il.bsl @@ -52,8 +52,7 @@ extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 { .field static assembly initonly class assembly/test6@38 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed + .method assembly specialname rtspecialname instance void .ctor() cil managed { .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) @@ -64,8 +63,7 @@ IL_0006: ret } - .method public strict virtual instance int32 - Invoke(int32 x) cil managed + .method public strict virtual instance int32 Invoke(int32 x) cil managed { .maxstack 8 @@ -75,8 +73,7 @@ IL_0003: ret } - .method private specialname rtspecialname static - void .cctor() cil managed + .method private specialname rtspecialname static void .cctor() cil managed { .maxstack 10 @@ -91,8 +88,7 @@ extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 { .field static assembly initonly class assembly/test7@47 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed + .method assembly specialname rtspecialname instance void .ctor() cil managed { .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) @@ -103,8 +99,7 @@ IL_0006: ret } - .method public strict virtual instance int32 - Invoke(int32 x) cil managed + .method public strict virtual instance int32 Invoke(int32 x) cil managed { .maxstack 8 @@ -114,8 +109,7 @@ IL_0003: ret } - .method private specialname rtspecialname static - void .cctor() cil managed + .method private specialname rtspecialname static void .cctor() cil managed { .maxstack 10 diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnString01.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnString01.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.netcore.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnString01.fs.RealInternalSignatureOff.il.bsl similarity index 97% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.netcore.release.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnString01.fs.RealInternalSignatureOff.il.bsl index 66b3dcc4d84..6b807671df2 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.netcore.release.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnString01.fs.RealInternalSignatureOff.il.bsl @@ -52,8 +52,7 @@ extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 { .field static assembly initonly class assembly/test8@54 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed + .method assembly specialname rtspecialname instance void .ctor() cil managed { .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) @@ -64,8 +63,7 @@ IL_0006: ret } - .method public strict virtual instance char - Invoke(char x) cil managed + .method public strict virtual instance char Invoke(char x) cil managed { .maxstack 8 @@ -77,8 +75,7 @@ IL_0005: ret } - .method private specialname rtspecialname static - void .cctor() cil managed + .method private specialname rtspecialname static void .cctor() cil managed { .maxstack 10 @@ -93,8 +90,7 @@ extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 { .field static assembly initonly class assembly/test9@63 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed + .method assembly specialname rtspecialname instance void .ctor() cil managed { .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) @@ -105,8 +101,7 @@ IL_0006: ret } - .method public strict virtual instance char - Invoke(char x) cil managed + .method public strict virtual instance char Invoke(char x) cil managed { .maxstack 8 @@ -118,8 +113,7 @@ IL_0005: ret } - .method private specialname rtspecialname static - void .cctor() cil managed + .method private specialname rtspecialname static void .cctor() cil managed { .maxstack 10 diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.netcore.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnString01.fs.RealInternalSignatureOn.il.bsl similarity index 97% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.netcore.release.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnString01.fs.RealInternalSignatureOn.il.bsl index 66b3dcc4d84..6b807671df2 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.netcore.release.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachOnString01.fs.RealInternalSignatureOn.il.bsl @@ -52,8 +52,7 @@ extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 { .field static assembly initonly class assembly/test8@54 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed + .method assembly specialname rtspecialname instance void .ctor() cil managed { .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) @@ -64,8 +63,7 @@ IL_0006: ret } - .method public strict virtual instance char - Invoke(char x) cil managed + .method public strict virtual instance char Invoke(char x) cil managed { .maxstack 8 @@ -77,8 +75,7 @@ IL_0005: ret } - .method private specialname rtspecialname static - void .cctor() cil managed + .method private specialname rtspecialname static void .cctor() cil managed { .maxstack 10 @@ -93,8 +90,7 @@ extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 { .field static assembly initonly class assembly/test9@63 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed + .method assembly specialname rtspecialname instance void .ctor() cil managed { .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) @@ -105,8 +101,7 @@ IL_0006: ret } - .method public strict virtual instance char - Invoke(char x) cil managed + .method public strict virtual instance char Invoke(char x) cil managed { .maxstack 8 @@ -118,8 +113,7 @@ IL_0005: ret } - .method private specialname rtspecialname static - void .cctor() cil managed + .method private specialname rtspecialname static void .cctor() cil managed { .maxstack 10 diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepByte.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepByte.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepByte.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepByte.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepByte.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepByte.fs.RealInternalSignatureOff.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepByte.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepByte.fs.RealInternalSignatureOff.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepByte.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepByte.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepByte.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepByte.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepChar.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepChar.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepChar.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepChar.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepChar.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepChar.fs.RealInternalSignatureOff.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepChar.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepChar.fs.RealInternalSignatureOff.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepChar.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepChar.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepChar.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepChar.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepInt16.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt16.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepInt16.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt16.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepInt16.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt16.fs.RealInternalSignatureOff.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepInt16.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt16.fs.RealInternalSignatureOff.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt16.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt16.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt16.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt16.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepInt32.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt32.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepInt32.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt32.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepInt32.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt32.fs.RealInternalSignatureOff.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepInt32.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt32.fs.RealInternalSignatureOff.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt32.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt32.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt32.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt32.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepInt64.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt64.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepInt64.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt64.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepInt64.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt64.fs.RealInternalSignatureOff.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepInt64.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt64.fs.RealInternalSignatureOff.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt64.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt64.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt64.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepInt64.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepIntPtr.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepIntPtr.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepIntPtr.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepIntPtr.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepIntPtr.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepIntPtr.fs.RealInternalSignatureOff.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepIntPtr.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepIntPtr.fs.RealInternalSignatureOff.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepIntPtr.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepIntPtr.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepIntPtr.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepIntPtr.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepSByte.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepSByte.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepSByte.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepSByte.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepSByte.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepSByte.fs.RealInternalSignatureOff.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepSByte.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepSByte.fs.RealInternalSignatureOff.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepSByte.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepSByte.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepSByte.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepSByte.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUInt16.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt16.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUInt16.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt16.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUInt16.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt16.fs.RealInternalSignatureOff.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUInt16.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt16.fs.RealInternalSignatureOff.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt16.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt16.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt16.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt16.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUInt32.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt32.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUInt32.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt32.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUInt32.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt32.fs.RealInternalSignatureOff.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUInt32.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt32.fs.RealInternalSignatureOff.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt32.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt32.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt32.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt32.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUInt64.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt64.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUInt64.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt64.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUInt64.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt64.fs.RealInternalSignatureOff.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUInt64.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt64.fs.RealInternalSignatureOff.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt64.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt64.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt64.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUInt64.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUIntPtr.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUIntPtr.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUIntPtr.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUIntPtr.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUIntPtr.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUIntPtr.fs.RealInternalSignatureOff.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStepUIntPtr.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUIntPtr.fs.RealInternalSignatureOff.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUIntPtr.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUIntPtr.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUIntPtr.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStepUIntPtr.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStep_UnitsOfMeasure.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStep_UnitsOfMeasure.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStep_UnitsOfMeasure.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStep_UnitsOfMeasure.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStep_UnitsOfMeasure.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStep_UnitsOfMeasure.fs.RealInternalSignatureOff.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachRangeStep_UnitsOfMeasure.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStep_UnitsOfMeasure.fs.RealInternalSignatureOff.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStep_UnitsOfMeasure.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStep_UnitsOfMeasure.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStep_UnitsOfMeasure.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForEachRangeStep_UnitsOfMeasure.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForLoop.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForLoop.fs new file mode 100644 index 00000000000..9a732ba4a30 --- /dev/null +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ForLoop.fs @@ -0,0 +1,483 @@ +namespace EmittedIL + +open Xunit +open FSharp.Test +open FSharp.Test.Compiler + +module ForLoop = + + let verifyCompilation compilation = + compilation + |> withOptions [ "--test:EmitFeeFeeAs100001" ] + |> asExe + |> withOptimize + |> withEmbeddedPdb + |> withEmbedAllSource + |> ignoreWarnings + |> verifyILBaseline + + // SOURCE=NoAllocationOfTuple01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoAllocationOfTuple01.dll" # NoAllocationOfTuple01.fs + [] + let ``NoAllocationOfTuple01_fs_RealInternalSignatureOff`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NoAllocationOfTuple01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoAllocationOfTuple01.dll" # NoAllocationOfTuple01.fs + [] + let ``NoAllocationOfTuple01_fs_RealInternalSignatureOn`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachOnArray01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ForEachOnArray01.dll" # ForEachOnArray01.fs + [] + let ``ForEachOnArray01_fs_RealInternalSignatureOff`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachOnArray01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ForEachOnArray01.dll" # ForEachOnArray01.fs + [] + let ``ForEachOnArray01_fs_RealInternalSignatureOn`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachOnList01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ForEachOnList01.dll" # ForEachOnList01.fs + [] + let ``ForEachOnList01_fs_RealInternalSignatureOff`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachOnList01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ForEachOnList01.dll" # ForEachOnList01.fs + [] + let ``ForEachOnList01_fs_RealInternalSignatureOn`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachOnString01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ForEachOnString01.dll" # ForEachOnString01.fs + [] + let ``ForEachOnString01_fs_RealInternalSignatureOff`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachOnString01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ForEachOnString01.dll" # ForEachOnString01.fs + [] + let ``ForEachOnString01_fs_RealInternalSignatureOn`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ZeroToArrLength01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ZeroToArrLength01.dll" # ZeroToArrLength01.fs + [] + let ``ZeroToArrLength01_fs_RealInternalSignatureOff`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ZeroToArrLength01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ZeroToArrLength01.dll" # ZeroToArrLength01.fs + [] + let ``ZeroToArrLength01_fs_RealInternalSignatureOn`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ZeroToArrLength02.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ZeroToArrLength02.dll" # ZeroToArrLength02.fs + [] + let ``ZeroToArrLength02_fs_RealInternalSignatureOff`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ZeroToArrLength02.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ZeroToArrLength02.dll" # ZeroToArrLength02.fs + [] + let ``ZeroToArrLength02_fs_RealInternalSignatureOn`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NoIEnumerable01.fsx SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoIEnumerable01.dll" # NoIEnumerable01.fsx + [] + let ``NoIEnumerable01_fsx_RealInternalSignatureOff`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NoIEnumerable01.fsx SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoIEnumerable01.dll" # NoIEnumerable01.fsx + [] + let ``NoIEnumerable01_fsx_RealInternalSignatureOn`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NoIEnumerable02.fsx SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoIEnumerable02.dll" # NoIEnumerable02.fsx + [] + let ``NoIEnumerable02_fsx_RealInternalSignatureOff`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NoIEnumerable02.fsx SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoIEnumerable02.dll" # NoIEnumerable02.fsx + [] + let ``NoIEnumerable02_fsx_RealInternalSignatureOn`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NoIEnumerable03.fsx SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoIEnumerable03.dll" # NoIEnumerable03.fsx + [] + let ``NoIEnumerable03_fsx_RealInternalSignatureOff`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NoIEnumerable03.fsx SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoIEnumerable03.dll" # NoIEnumerable03.fsx + [] + let ``NoIEnumerable03_fsx_RealInternalSignatureOn`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd01.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd01.fs --optimize+ + [] + let ``NonTrivialBranchingBindingInEnd01_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd01.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd01.fs --optimize+ + [] + let ``NonTrivialBranchingBindingInEnd01_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd01.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd01.fs --optimize- + [] + let ``NonTrivialBranchingBindingInEnd01_fs_RealInternalSignatureOff_nonopt`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd01.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd01.fs --optimize- + [] + let ``NonTrivialBranchingBindingInEnd01_fs_RealInternalSignatureOn_nonopt`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd02.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd02.fs --optimize+ + [] + let ``NonTrivialBranchingBindingInEnd02_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd02.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd02.fs --optimize+ + [] + let ``NonTrivialBranchingBindingInEnd02_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd02.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd02.fs --optimize- + [] + let ``NonTrivialBranchingBindingInEnd02_fs_RealInternalSignatureOff_nonopt`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd02.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd02.fs --optimize- + [] + let ``NonTrivialBranchingBindingInEnd02_fs_RealInternalSignatureOn_nonopt`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd03.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd03.fs --optimize+ + [] + let ``NonTrivialBranchingBindingInEnd03_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd03.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd03.fs --optimize+ + [] + let ``NonTrivialBranchingBindingInEnd03_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd03.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd03.fs --optimize- + [] + let ``NonTrivialBranchingBindingInEnd03_fs_RealInternalSignatureOff_nonopt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd03.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd03.fs --optimize- + [] + let ``NonTrivialBranchingBindingInEnd03_fs_RealInternalSignatureOn_nonopt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd04.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd04.fs --optimize+ + [] + let ``NonTrivialBranchingBindingInEnd04_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd04.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd04.fs --optimize+ + [] + let ``NonTrivialBranchingBindingInEnd04_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd04.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd04.fs --optimize- + [] + let ``NonTrivialBranchingBindingInEnd04_fs_RealInternalSignatureOff_nonopt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd04.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd04.fs --optimize- + [] + let ``NonTrivialBranchingBindingInEnd04_fs_RealInternalSignatureOn_nonopt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd05.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd05.fs --optimize+ + [] + let ``NonTrivialBranchingBindingInEnd05_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd05.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd05.fs --optimize+ + [] + let ``NonTrivialBranchingBindingInEnd05_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd05.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd05.fs --optimize- + [] + let ``NonTrivialBranchingBindingInEnd05_fs_RealInternalSignatureOff_nonopt`` compilation = + compilation + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=NonTrivialBranchingBindingInEnd05.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd05.fs --optimize- + [] + let ``NonTrivialBranchingBindingInEnd05_fs_RealInternalSignatureOn_nonopt`` compilation = + compilation + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachRangeStepSByte.fs SCFLAGS="--optimize+" # ForEachRangeStepSByte.fs --optimize+ + [] + let ``ForEachRangeStepSByte_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachRangeStepSByte.fs SCFLAGS="--optimize+" # ForEachRangeStepSByte.fs --optimize+ + [] + let ``ForEachRangeStepSByte_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachRangeStepByte.fs SCFLAGS="--optimize+" # ForEachRangeStepByte.fs --optimize+ + [] + let ``ForEachRangeStepByte_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachRangeStepByte.fs SCFLAGS="--optimize+" # ForEachRangeStepByte.fs --optimize+ + [] + let ``ForEachRangeStepByte_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachRangeStepChar.fs SCFLAGS="--optimize+" # ForEachRangeStepChar.fs --optimize+ + [] + let ``ForEachRangeStepChar_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachRangeStepChar.fs SCFLAGS="--optimize+" # ForEachRangeStepChar.fs --optimize+ + [] + let ``ForEachRangeStepChar_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachRangeStepInt16.fs SCFLAGS="--optimize+" # ForEachRangeStepInt16.fs --optimize+ + [] + let ``ForEachRangeStepInt16_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachRangeStepInt16.fs SCFLAGS="--optimize+" # ForEachRangeStepInt16.fs --optimize+ + [] + let ``ForEachRangeStepInt16_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachRangeStepUInt16.fs SCFLAGS="--optimize+" # ForEachRangeStepUInt16.fs --optimize+ + [] + let ``ForEachRangeStepUInt16_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachRangeStepUInt16.fs SCFLAGS="--optimize+" # ForEachRangeStepUInt16.fs --optimize+ + [] + let ``ForEachRangeStepUInt16_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachRangeStepInt32.fs SCFLAGS="--optimize+" # ForEachRangeStepInt32.fs --optimize+ + [] + let ``ForEachRangeStepInt32_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachRangeStepInt32.fs SCFLAGS="--optimize+" # ForEachRangeStepInt32.fs --optimize+ + [] + let ``ForEachRangeStepInt32_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachRangeStepUInt32.fs SCFLAGS="--optimize+" # ForEachRangeStepUInt32.fs --optimize+ + [] + let ``ForEachRangeStepUInt32_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachRangeStepUInt32.fs SCFLAGS="--optimize+" # ForEachRangeStepUInt32.fs --optimize+ + [] + let ``ForEachRangeStepUInt32_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachRangeStepInt64.fs SCFLAGS="--optimize+" # ForEachRangeStepInt64.fs --optimize+ + [] + let ``ForEachRangeStepInt64_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachRangeStepInt64.fs SCFLAGS="--optimize+" # ForEachRangeStepInt64.fs --optimize+ + [] + let ``ForEachRangeStepInt64_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachRangeStepUInt64.fs SCFLAGS="--optimize+" # ForEachRangeStepUInt64.fs --optimize+ + [] + let ``ForEachRangeStepUInt64_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachRangeStepUInt64.fs SCFLAGS="--optimize+" # ForEachRangeStepUInt64.fs --optimize+ + [] + let ``ForEachRangeStepUInt64_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachRangeStepIntPtr.fs SCFLAGS="--optimize+" # ForEachRangeStepIntPtr.fs --optimize+ + [] + let ``ForEachRangeStepIntPtr_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachRangeStepIntPtr.fs SCFLAGS="--optimize+" # ForEachRangeStepIntPtr.fs --optimize+ + [] + let ``ForEachRangeStepIntPtr_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachRangeStepUIntPtr.fs SCFLAGS="--optimize+" # ForEachRangeStepUIntPtr.fs --optimize+ + [] + let ``ForEachRangeStepUIntPtr_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachRangeStepUIntPtr.fs SCFLAGS="--optimize+" # ForEachRangeStepUIntPtr.fs --optimize+ + [] + let ``ForEachRangeStepUIntPtr_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation + + // SOURCE=ForEachRangeStep_UnitsOfMeasure.fs SCFLAGS="--optimize+" # ForEachRangeStep_UnitsOfMeasure.fs --optimize+ + [] + let ``ForEachRangeStep_UnitsOfMeasure_fs_RealInternalSignatureOff_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOff + |> verifyCompilation + + // SOURCE=ForEachRangeStep_UnitsOfMeasure.fs SCFLAGS="--optimize+" # ForEachRangeStep_UnitsOfMeasure.fs --optimize+ + [] + let ``ForEachRangeStep_UnitsOfMeasure_fs_RealInternalSignatureOn_opt`` compilation = + compilation + |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. + |> withRealInternalSignatureOn + |> verifyCompilation diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoAllocationOfTuple01.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoAllocationOfTuple01.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoAllocationOfTuple01.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoAllocationOfTuple01.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoAllocationOfTuple01.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoAllocationOfTuple01.fs.RealInternalSignatureOff.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoAllocationOfTuple01.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoAllocationOfTuple01.fs.RealInternalSignatureOff.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoAllocationOfTuple01.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoAllocationOfTuple01.fs.RealInternalSignatureOn.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoAllocationOfTuple01.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoAllocationOfTuple01.fs.RealInternalSignatureOn.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable01.fsx similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable01.fsx diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.netcore.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable01.fsx.RealInternalSignatureOff.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.netcore.release.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable01.fsx.RealInternalSignatureOff.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.netcore.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable01.fsx.RealInternalSignatureOn.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.netcore.release.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable01.fsx.RealInternalSignatureOn.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable02.fsx similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable02.fsx diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.netcore.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable02.fsx.RealInternalSignatureOff.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.netcore.release.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable02.fsx.RealInternalSignatureOff.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.netcore.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable02.fsx.RealInternalSignatureOn.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.netcore.release.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable02.fsx.RealInternalSignatureOn.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable03.fsx similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable03.fsx diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.netcore.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable03.fsx.RealInternalSignatureOff.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.netcore.release.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable03.fsx.RealInternalSignatureOff.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.netcore.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable03.fsx.RealInternalSignatureOn.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.netcore.release.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NoIEnumerable03.fsx.RealInternalSignatureOn.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd01.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd01.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd01.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd01.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd01.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOff.il.bsl similarity index 97% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd01.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOff.il.bsl index 6a74361f612..24776ea3bce 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd01.fs.opt.il.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOff.il.bsl @@ -43,8 +43,7 @@ extends [runtime]System.Object { .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public specialname static int32[] - get_r() cil managed + .method public specialname static int32[] get_r() cil managed { .maxstack 8 @@ -52,8 +51,7 @@ IL_0005: ret } - .method public specialname static int32[] - get_w() cil managed + .method public specialname static int32[] get_w() cil managed { .maxstack 8 diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd01.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOff.opt.il.bsl similarity index 97% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd01.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOff.opt.il.bsl index 6a74361f612..24776ea3bce 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd01.fs.il.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOff.opt.il.bsl @@ -43,8 +43,7 @@ extends [runtime]System.Object { .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public specialname static int32[] - get_r() cil managed + .method public specialname static int32[] get_r() cil managed { .maxstack 8 @@ -52,8 +51,7 @@ IL_0005: ret } - .method public specialname static int32[] - get_w() cil managed + .method public specialname static int32[] get_w() cil managed { .maxstack 8 diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd01.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOn.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd01.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOn.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd01.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd01.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd01.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd02.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd02.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd02.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd02.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd02.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOff.il.bsl similarity index 97% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd02.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOff.il.bsl index 415e5ffd7f1..e3a8fe9afec 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd02.fs.il.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOff.il.bsl @@ -43,8 +43,7 @@ extends [runtime]System.Object { .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public specialname static int32[] - get_r() cil managed + .method public specialname static int32[] get_r() cil managed { .maxstack 8 @@ -52,8 +51,7 @@ IL_0005: ret } - .method public specialname static int32[] - get_w() cil managed + .method public specialname static int32[] get_w() cil managed { .maxstack 8 diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd02.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOff.opt.il.bsl similarity index 97% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd02.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOff.opt.il.bsl index 415e5ffd7f1..e3a8fe9afec 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd02.fs.opt.il.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOff.opt.il.bsl @@ -43,8 +43,7 @@ extends [runtime]System.Object { .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public specialname static int32[] - get_r() cil managed + .method public specialname static int32[] get_r() cil managed { .maxstack 8 @@ -52,8 +51,7 @@ IL_0005: ret } - .method public specialname static int32[] - get_w() cil managed + .method public specialname static int32[] get_w() cil managed { .maxstack 8 diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd02.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOn.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd02.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOn.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd02.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd02.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd02.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd03.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd03.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd03.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd03.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd04.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOff.il.bsl similarity index 75% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd04.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOff.il.bsl index afcb05828cd..f51b28f7d87 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd04.fs.opt.il.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOff.il.bsl @@ -169,7 +169,11 @@ .entrypoint .maxstack 7 - .locals init (int32 V_0) + .locals init (int32 V_0, + uint64 V_1, + valuetype [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.ListCollector`1 V_2, + uint64 V_3, + int32 V_4) IL_0000: ldc.i4.8 IL_0001: ldc.i4.1 IL_0002: call !!0[] [FSharp.Core]Microsoft.FSharp.Collections.ArrayModule::Create(int32, @@ -200,57 +204,95 @@ IL_0049: nop IL_004a: ldc.i4.1 IL_004b: sub - IL_004c: ldc.i4.m1 - IL_004d: ldc.i4.0 - IL_004e: call class [runtime]System.Collections.Generic.IEnumerable`1 [FSharp.Core]Microsoft.FSharp.Core.Operators/OperatorIntrinsics::RangeInt32(int32, - int32, - int32) - IL_0053: call class [runtime]System.Collections.Generic.IEnumerable`1 [FSharp.Core]Microsoft.FSharp.Core.Operators::CreateSequence(class [runtime]System.Collections.Generic.IEnumerable`1) - IL_0058: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.SeqModule::ToList(class [runtime]System.Collections.Generic.IEnumerable`1) - IL_005d: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::current@9 - IL_0062: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() - IL_0067: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_006c: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::next@9 - IL_0071: br.s IL_00b9 - - IL_0073: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() - IL_0078: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_007d: stloc.0 - IL_007e: call int32[] assembly::get_r() - IL_0083: ldloc.0 - IL_0084: call int32[] assembly::get_r() - IL_0089: ldloc.0 - IL_008a: ldelem [runtime]System.Int32 - IL_008f: call int32[] assembly::get_w() - IL_0094: ldloc.0 - IL_0095: ldelem [runtime]System.Int32 - IL_009a: add - IL_009b: stelem [runtime]System.Int32 - IL_00a0: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() - IL_00a5: call void assembly::set_current@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_00aa: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() - IL_00af: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_00b4: call void assembly::set_next@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_00b9: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() - IL_00be: brtrue.s IL_0073 - - IL_00c0: nop - IL_00c1: nop - IL_00c2: call int32[] assembly::get_r() - IL_00c7: ldc.i4.0 - IL_00c8: ldelem [runtime]System.Int32 - IL_00cd: ldc.i4.3 - IL_00ce: bne.un.s IL_00d4 - - IL_00d0: ldc.i4.0 - IL_00d1: nop - IL_00d2: br.s IL_00d6 - - IL_00d4: ldc.i4.1 - IL_00d5: nop - IL_00d6: call !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::Exit(int32) - IL_00db: pop - IL_00dc: ret + IL_004c: stloc.0 + IL_004d: ldloc.0 + IL_004e: ldc.i4.0 + IL_004f: bge.s IL_0056 + + IL_0051: ldc.i4.0 + IL_0052: conv.i8 + IL_0053: nop + IL_0054: br.s IL_005e + + IL_0056: ldloc.0 + IL_0057: ldc.i4.0 + IL_0058: sub + IL_0059: conv.i8 + IL_005a: ldc.i4.1 + IL_005b: conv.i8 + IL_005c: add + IL_005d: nop + IL_005e: stloc.1 + IL_005f: ldc.i4.0 + IL_0060: conv.i8 + IL_0061: stloc.3 + IL_0062: ldc.i4.0 + IL_0063: stloc.s V_4 + IL_0065: br.s IL_007c + + IL_0067: ldloca.s V_2 + IL_0069: ldloc.s V_4 + IL_006b: call instance void valuetype [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.ListCollector`1::Add(!0) + IL_0070: nop + IL_0071: ldloc.s V_4 + IL_0073: ldc.i4.1 + IL_0074: add + IL_0075: stloc.s V_4 + IL_0077: ldloc.3 + IL_0078: ldc.i4.1 + IL_0079: conv.i8 + IL_007a: add + IL_007b: stloc.3 + IL_007c: ldloc.3 + IL_007d: ldloc.1 + IL_007e: blt.un.s IL_0067 + + IL_0080: ldloca.s V_2 + IL_0082: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 valuetype [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.ListCollector`1::Close() + IL_0087: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::current@9 + IL_008c: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() + IL_0091: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() + IL_0096: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::next@9 + IL_009b: br.s IL_00e3 + + IL_009d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() + IL_00a2: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() + IL_00a7: stloc.0 + IL_00a8: call int32[] assembly::get_r() + IL_00ad: ldloc.0 + IL_00ae: call int32[] assembly::get_r() + IL_00b3: ldloc.0 + IL_00b4: ldelem [runtime]System.Int32 + IL_00b9: call int32[] assembly::get_w() + IL_00be: ldloc.0 + IL_00bf: ldelem [runtime]System.Int32 + IL_00c4: add + IL_00c5: stelem [runtime]System.Int32 + IL_00ca: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() + IL_00cf: call void assembly::set_current@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) + IL_00d4: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() + IL_00d9: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() + IL_00de: call void assembly::set_next@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) + IL_00e3: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() + IL_00e8: brtrue.s IL_009d + + IL_00ea: nop + IL_00eb: nop + IL_00ec: call int32[] assembly::get_r() + IL_00f1: ldc.i4.0 + IL_00f2: ldelem [runtime]System.Int32 + IL_00f7: ldc.i4.3 + IL_00f8: bne.un.s IL_00fe + + IL_00fa: ldc.i4.0 + IL_00fb: nop + IL_00fc: br.s IL_0100 + + IL_00fe: ldc.i4.1 + IL_00ff: nop + IL_0100: call !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::Exit(int32) + IL_0105: pop + IL_0106: ret } } diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd04.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOff.opt.il.bsl similarity index 75% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd04.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOff.opt.il.bsl index afcb05828cd..f51b28f7d87 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd04.fs.il.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOff.opt.il.bsl @@ -169,7 +169,11 @@ .entrypoint .maxstack 7 - .locals init (int32 V_0) + .locals init (int32 V_0, + uint64 V_1, + valuetype [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.ListCollector`1 V_2, + uint64 V_3, + int32 V_4) IL_0000: ldc.i4.8 IL_0001: ldc.i4.1 IL_0002: call !!0[] [FSharp.Core]Microsoft.FSharp.Collections.ArrayModule::Create(int32, @@ -200,57 +204,95 @@ IL_0049: nop IL_004a: ldc.i4.1 IL_004b: sub - IL_004c: ldc.i4.m1 - IL_004d: ldc.i4.0 - IL_004e: call class [runtime]System.Collections.Generic.IEnumerable`1 [FSharp.Core]Microsoft.FSharp.Core.Operators/OperatorIntrinsics::RangeInt32(int32, - int32, - int32) - IL_0053: call class [runtime]System.Collections.Generic.IEnumerable`1 [FSharp.Core]Microsoft.FSharp.Core.Operators::CreateSequence(class [runtime]System.Collections.Generic.IEnumerable`1) - IL_0058: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.SeqModule::ToList(class [runtime]System.Collections.Generic.IEnumerable`1) - IL_005d: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::current@9 - IL_0062: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() - IL_0067: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_006c: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::next@9 - IL_0071: br.s IL_00b9 - - IL_0073: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() - IL_0078: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_007d: stloc.0 - IL_007e: call int32[] assembly::get_r() - IL_0083: ldloc.0 - IL_0084: call int32[] assembly::get_r() - IL_0089: ldloc.0 - IL_008a: ldelem [runtime]System.Int32 - IL_008f: call int32[] assembly::get_w() - IL_0094: ldloc.0 - IL_0095: ldelem [runtime]System.Int32 - IL_009a: add - IL_009b: stelem [runtime]System.Int32 - IL_00a0: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() - IL_00a5: call void assembly::set_current@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_00aa: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() - IL_00af: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_00b4: call void assembly::set_next@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_00b9: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() - IL_00be: brtrue.s IL_0073 - - IL_00c0: nop - IL_00c1: nop - IL_00c2: call int32[] assembly::get_r() - IL_00c7: ldc.i4.0 - IL_00c8: ldelem [runtime]System.Int32 - IL_00cd: ldc.i4.3 - IL_00ce: bne.un.s IL_00d4 - - IL_00d0: ldc.i4.0 - IL_00d1: nop - IL_00d2: br.s IL_00d6 - - IL_00d4: ldc.i4.1 - IL_00d5: nop - IL_00d6: call !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::Exit(int32) - IL_00db: pop - IL_00dc: ret + IL_004c: stloc.0 + IL_004d: ldloc.0 + IL_004e: ldc.i4.0 + IL_004f: bge.s IL_0056 + + IL_0051: ldc.i4.0 + IL_0052: conv.i8 + IL_0053: nop + IL_0054: br.s IL_005e + + IL_0056: ldloc.0 + IL_0057: ldc.i4.0 + IL_0058: sub + IL_0059: conv.i8 + IL_005a: ldc.i4.1 + IL_005b: conv.i8 + IL_005c: add + IL_005d: nop + IL_005e: stloc.1 + IL_005f: ldc.i4.0 + IL_0060: conv.i8 + IL_0061: stloc.3 + IL_0062: ldc.i4.0 + IL_0063: stloc.s V_4 + IL_0065: br.s IL_007c + + IL_0067: ldloca.s V_2 + IL_0069: ldloc.s V_4 + IL_006b: call instance void valuetype [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.ListCollector`1::Add(!0) + IL_0070: nop + IL_0071: ldloc.s V_4 + IL_0073: ldc.i4.1 + IL_0074: add + IL_0075: stloc.s V_4 + IL_0077: ldloc.3 + IL_0078: ldc.i4.1 + IL_0079: conv.i8 + IL_007a: add + IL_007b: stloc.3 + IL_007c: ldloc.3 + IL_007d: ldloc.1 + IL_007e: blt.un.s IL_0067 + + IL_0080: ldloca.s V_2 + IL_0082: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 valuetype [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.ListCollector`1::Close() + IL_0087: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::current@9 + IL_008c: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() + IL_0091: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() + IL_0096: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::next@9 + IL_009b: br.s IL_00e3 + + IL_009d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() + IL_00a2: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() + IL_00a7: stloc.0 + IL_00a8: call int32[] assembly::get_r() + IL_00ad: ldloc.0 + IL_00ae: call int32[] assembly::get_r() + IL_00b3: ldloc.0 + IL_00b4: ldelem [runtime]System.Int32 + IL_00b9: call int32[] assembly::get_w() + IL_00be: ldloc.0 + IL_00bf: ldelem [runtime]System.Int32 + IL_00c4: add + IL_00c5: stelem [runtime]System.Int32 + IL_00ca: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() + IL_00cf: call void assembly::set_current@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) + IL_00d4: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() + IL_00d9: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() + IL_00de: call void assembly::set_next@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) + IL_00e3: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() + IL_00e8: brtrue.s IL_009d + + IL_00ea: nop + IL_00eb: nop + IL_00ec: call int32[] assembly::get_r() + IL_00f1: ldc.i4.0 + IL_00f2: ldelem [runtime]System.Int32 + IL_00f7: ldc.i4.3 + IL_00f8: bne.un.s IL_00fe + + IL_00fa: ldc.i4.0 + IL_00fb: nop + IL_00fc: br.s IL_0100 + + IL_00fe: ldc.i4.1 + IL_00ff: nop + IL_0100: call !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::Exit(int32) + IL_0105: pop + IL_0106: ret } } diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd03.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOn.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd03.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOn.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd03.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd03.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd03.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd04.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd04.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd04.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd04.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd03.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOff.il.bsl similarity index 70% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd03.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOff.il.bsl index fb5c2acf0b3..df03b5ff533 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd03.fs.opt.il.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOff.il.bsl @@ -169,7 +169,11 @@ .entrypoint .maxstack 7 - .locals init (int32 V_0) + .locals init (int32 V_0, + uint64 V_1, + valuetype [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.ListCollector`1 V_2, + uint64 V_3, + int32 V_4) IL_0000: ldc.i4.8 IL_0001: ldc.i4.1 IL_0002: call !!0[] [FSharp.Core]Microsoft.FSharp.Collections.ArrayModule::Create(int32, @@ -180,77 +184,115 @@ IL_000e: call !!0[] [FSharp.Core]Microsoft.FSharp.Collections.ArrayModule::Create(int32, !!0) IL_0013: stsfld int32[] ''.$assembly::w@7 - IL_0018: ldc.i4.0 - IL_0019: ldc.i4.1 - IL_001a: call int32[] assembly::get_r() - IL_001f: ldlen - IL_0020: conv.i4 - IL_0021: stsfld int32 ''.$assembly::e1@1 - IL_0026: call int32[] assembly::get_w() - IL_002b: ldlen - IL_002c: conv.i4 - IL_002d: stsfld int32 ''.$assembly::e2@1 - IL_0032: call int32 assembly::get_e1@1() - IL_0037: call int32 assembly::get_e2@1() - IL_003c: bge.s IL_0046 - - IL_003e: call int32 assembly::get_e1@1() - IL_0043: nop - IL_0044: br.s IL_004c - - IL_0046: call int32 assembly::get_e2@1() - IL_004b: nop - IL_004c: ldc.i4.1 - IL_004d: sub - IL_004e: call class [runtime]System.Collections.Generic.IEnumerable`1 [FSharp.Core]Microsoft.FSharp.Core.Operators/OperatorIntrinsics::RangeInt32(int32, - int32, - int32) - IL_0053: call class [runtime]System.Collections.Generic.IEnumerable`1 [FSharp.Core]Microsoft.FSharp.Core.Operators::CreateSequence(class [runtime]System.Collections.Generic.IEnumerable`1) - IL_0058: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.SeqModule::ToList(class [runtime]System.Collections.Generic.IEnumerable`1) - IL_005d: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::current@9 - IL_0062: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() - IL_0067: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_006c: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::next@9 - IL_0071: br.s IL_00b9 - - IL_0073: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() - IL_0078: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_007d: stloc.0 - IL_007e: call int32[] assembly::get_r() - IL_0083: ldloc.0 - IL_0084: call int32[] assembly::get_r() - IL_0089: ldloc.0 - IL_008a: ldelem [runtime]System.Int32 - IL_008f: call int32[] assembly::get_w() - IL_0094: ldloc.0 - IL_0095: ldelem [runtime]System.Int32 - IL_009a: add - IL_009b: stelem [runtime]System.Int32 - IL_00a0: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() - IL_00a5: call void assembly::set_current@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_00aa: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() - IL_00af: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_00b4: call void assembly::set_next@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_00b9: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() - IL_00be: brtrue.s IL_0073 - - IL_00c0: nop - IL_00c1: nop - IL_00c2: call int32[] assembly::get_r() - IL_00c7: ldc.i4.0 - IL_00c8: ldelem [runtime]System.Int32 - IL_00cd: ldc.i4.3 - IL_00ce: bne.un.s IL_00d4 - - IL_00d0: ldc.i4.0 - IL_00d1: nop - IL_00d2: br.s IL_00d6 - - IL_00d4: ldc.i4.1 - IL_00d5: nop - IL_00d6: call !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::Exit(int32) - IL_00db: pop - IL_00dc: ret + IL_0018: call int32[] assembly::get_r() + IL_001d: ldlen + IL_001e: conv.i4 + IL_001f: stsfld int32 ''.$assembly::e1@1 + IL_0024: call int32[] assembly::get_w() + IL_0029: ldlen + IL_002a: conv.i4 + IL_002b: stsfld int32 ''.$assembly::e2@1 + IL_0030: call int32 assembly::get_e1@1() + IL_0035: call int32 assembly::get_e2@1() + IL_003a: bge.s IL_0044 + + IL_003c: call int32 assembly::get_e1@1() + IL_0041: nop + IL_0042: br.s IL_004a + + IL_0044: call int32 assembly::get_e2@1() + IL_0049: nop + IL_004a: ldc.i4.1 + IL_004b: sub + IL_004c: stloc.0 + IL_004d: ldloc.0 + IL_004e: ldc.i4.0 + IL_004f: bge.s IL_0056 + + IL_0051: ldc.i4.0 + IL_0052: conv.i8 + IL_0053: nop + IL_0054: br.s IL_005e + + IL_0056: ldloc.0 + IL_0057: ldc.i4.0 + IL_0058: sub + IL_0059: conv.i8 + IL_005a: ldc.i4.1 + IL_005b: conv.i8 + IL_005c: add + IL_005d: nop + IL_005e: stloc.1 + IL_005f: ldc.i4.0 + IL_0060: conv.i8 + IL_0061: stloc.3 + IL_0062: ldloc.0 + IL_0063: stloc.s V_4 + IL_0065: br.s IL_007c + + IL_0067: ldloca.s V_2 + IL_0069: ldloc.s V_4 + IL_006b: call instance void valuetype [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.ListCollector`1::Add(!0) + IL_0070: nop + IL_0071: ldloc.s V_4 + IL_0073: ldc.i4.m1 + IL_0074: add + IL_0075: stloc.s V_4 + IL_0077: ldloc.3 + IL_0078: ldc.i4.1 + IL_0079: conv.i8 + IL_007a: add + IL_007b: stloc.3 + IL_007c: ldloc.3 + IL_007d: ldloc.1 + IL_007e: blt.un.s IL_0067 + + IL_0080: ldloca.s V_2 + IL_0082: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 valuetype [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.ListCollector`1::Close() + IL_0087: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::current@9 + IL_008c: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() + IL_0091: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() + IL_0096: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::next@9 + IL_009b: br.s IL_00e3 + + IL_009d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() + IL_00a2: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() + IL_00a7: stloc.0 + IL_00a8: call int32[] assembly::get_r() + IL_00ad: ldloc.0 + IL_00ae: call int32[] assembly::get_r() + IL_00b3: ldloc.0 + IL_00b4: ldelem [runtime]System.Int32 + IL_00b9: call int32[] assembly::get_w() + IL_00be: ldloc.0 + IL_00bf: ldelem [runtime]System.Int32 + IL_00c4: add + IL_00c5: stelem [runtime]System.Int32 + IL_00ca: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() + IL_00cf: call void assembly::set_current@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) + IL_00d4: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() + IL_00d9: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() + IL_00de: call void assembly::set_next@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) + IL_00e3: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() + IL_00e8: brtrue.s IL_009d + + IL_00ea: nop + IL_00eb: nop + IL_00ec: call int32[] assembly::get_r() + IL_00f1: ldc.i4.0 + IL_00f2: ldelem [runtime]System.Int32 + IL_00f7: ldc.i4.3 + IL_00f8: bne.un.s IL_00fe + + IL_00fa: ldc.i4.0 + IL_00fb: nop + IL_00fc: br.s IL_0100 + + IL_00fe: ldc.i4.1 + IL_00ff: nop + IL_0100: call !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::Exit(int32) + IL_0105: pop + IL_0106: ret } } diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd03.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOff.opt.il.bsl similarity index 70% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd03.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOff.opt.il.bsl index fb5c2acf0b3..df03b5ff533 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd03.fs.il.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOff.opt.il.bsl @@ -169,7 +169,11 @@ .entrypoint .maxstack 7 - .locals init (int32 V_0) + .locals init (int32 V_0, + uint64 V_1, + valuetype [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.ListCollector`1 V_2, + uint64 V_3, + int32 V_4) IL_0000: ldc.i4.8 IL_0001: ldc.i4.1 IL_0002: call !!0[] [FSharp.Core]Microsoft.FSharp.Collections.ArrayModule::Create(int32, @@ -180,77 +184,115 @@ IL_000e: call !!0[] [FSharp.Core]Microsoft.FSharp.Collections.ArrayModule::Create(int32, !!0) IL_0013: stsfld int32[] ''.$assembly::w@7 - IL_0018: ldc.i4.0 - IL_0019: ldc.i4.1 - IL_001a: call int32[] assembly::get_r() - IL_001f: ldlen - IL_0020: conv.i4 - IL_0021: stsfld int32 ''.$assembly::e1@1 - IL_0026: call int32[] assembly::get_w() - IL_002b: ldlen - IL_002c: conv.i4 - IL_002d: stsfld int32 ''.$assembly::e2@1 - IL_0032: call int32 assembly::get_e1@1() - IL_0037: call int32 assembly::get_e2@1() - IL_003c: bge.s IL_0046 - - IL_003e: call int32 assembly::get_e1@1() - IL_0043: nop - IL_0044: br.s IL_004c - - IL_0046: call int32 assembly::get_e2@1() - IL_004b: nop - IL_004c: ldc.i4.1 - IL_004d: sub - IL_004e: call class [runtime]System.Collections.Generic.IEnumerable`1 [FSharp.Core]Microsoft.FSharp.Core.Operators/OperatorIntrinsics::RangeInt32(int32, - int32, - int32) - IL_0053: call class [runtime]System.Collections.Generic.IEnumerable`1 [FSharp.Core]Microsoft.FSharp.Core.Operators::CreateSequence(class [runtime]System.Collections.Generic.IEnumerable`1) - IL_0058: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.SeqModule::ToList(class [runtime]System.Collections.Generic.IEnumerable`1) - IL_005d: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::current@9 - IL_0062: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() - IL_0067: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_006c: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::next@9 - IL_0071: br.s IL_00b9 - - IL_0073: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() - IL_0078: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_007d: stloc.0 - IL_007e: call int32[] assembly::get_r() - IL_0083: ldloc.0 - IL_0084: call int32[] assembly::get_r() - IL_0089: ldloc.0 - IL_008a: ldelem [runtime]System.Int32 - IL_008f: call int32[] assembly::get_w() - IL_0094: ldloc.0 - IL_0095: ldelem [runtime]System.Int32 - IL_009a: add - IL_009b: stelem [runtime]System.Int32 - IL_00a0: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() - IL_00a5: call void assembly::set_current@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_00aa: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() - IL_00af: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_00b4: call void assembly::set_next@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_00b9: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() - IL_00be: brtrue.s IL_0073 - - IL_00c0: nop - IL_00c1: nop - IL_00c2: call int32[] assembly::get_r() - IL_00c7: ldc.i4.0 - IL_00c8: ldelem [runtime]System.Int32 - IL_00cd: ldc.i4.3 - IL_00ce: bne.un.s IL_00d4 - - IL_00d0: ldc.i4.0 - IL_00d1: nop - IL_00d2: br.s IL_00d6 - - IL_00d4: ldc.i4.1 - IL_00d5: nop - IL_00d6: call !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::Exit(int32) - IL_00db: pop - IL_00dc: ret + IL_0018: call int32[] assembly::get_r() + IL_001d: ldlen + IL_001e: conv.i4 + IL_001f: stsfld int32 ''.$assembly::e1@1 + IL_0024: call int32[] assembly::get_w() + IL_0029: ldlen + IL_002a: conv.i4 + IL_002b: stsfld int32 ''.$assembly::e2@1 + IL_0030: call int32 assembly::get_e1@1() + IL_0035: call int32 assembly::get_e2@1() + IL_003a: bge.s IL_0044 + + IL_003c: call int32 assembly::get_e1@1() + IL_0041: nop + IL_0042: br.s IL_004a + + IL_0044: call int32 assembly::get_e2@1() + IL_0049: nop + IL_004a: ldc.i4.1 + IL_004b: sub + IL_004c: stloc.0 + IL_004d: ldloc.0 + IL_004e: ldc.i4.0 + IL_004f: bge.s IL_0056 + + IL_0051: ldc.i4.0 + IL_0052: conv.i8 + IL_0053: nop + IL_0054: br.s IL_005e + + IL_0056: ldloc.0 + IL_0057: ldc.i4.0 + IL_0058: sub + IL_0059: conv.i8 + IL_005a: ldc.i4.1 + IL_005b: conv.i8 + IL_005c: add + IL_005d: nop + IL_005e: stloc.1 + IL_005f: ldc.i4.0 + IL_0060: conv.i8 + IL_0061: stloc.3 + IL_0062: ldloc.0 + IL_0063: stloc.s V_4 + IL_0065: br.s IL_007c + + IL_0067: ldloca.s V_2 + IL_0069: ldloc.s V_4 + IL_006b: call instance void valuetype [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.ListCollector`1::Add(!0) + IL_0070: nop + IL_0071: ldloc.s V_4 + IL_0073: ldc.i4.m1 + IL_0074: add + IL_0075: stloc.s V_4 + IL_0077: ldloc.3 + IL_0078: ldc.i4.1 + IL_0079: conv.i8 + IL_007a: add + IL_007b: stloc.3 + IL_007c: ldloc.3 + IL_007d: ldloc.1 + IL_007e: blt.un.s IL_0067 + + IL_0080: ldloca.s V_2 + IL_0082: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 valuetype [FSharp.Core]Microsoft.FSharp.Core.CompilerServices.ListCollector`1::Close() + IL_0087: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::current@9 + IL_008c: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() + IL_0091: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() + IL_0096: stsfld class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 ''.$assembly::next@9 + IL_009b: br.s IL_00e3 + + IL_009d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() + IL_00a2: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() + IL_00a7: stloc.0 + IL_00a8: call int32[] assembly::get_r() + IL_00ad: ldloc.0 + IL_00ae: call int32[] assembly::get_r() + IL_00b3: ldloc.0 + IL_00b4: ldelem [runtime]System.Int32 + IL_00b9: call int32[] assembly::get_w() + IL_00be: ldloc.0 + IL_00bf: ldelem [runtime]System.Int32 + IL_00c4: add + IL_00c5: stelem [runtime]System.Int32 + IL_00ca: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() + IL_00cf: call void assembly::set_current@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) + IL_00d4: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_current@9() + IL_00d9: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() + IL_00de: call void assembly::set_next@9(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) + IL_00e3: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 assembly::get_next@9() + IL_00e8: brtrue.s IL_009d + + IL_00ea: nop + IL_00eb: nop + IL_00ec: call int32[] assembly::get_r() + IL_00f1: ldc.i4.0 + IL_00f2: ldelem [runtime]System.Int32 + IL_00f7: ldc.i4.3 + IL_00f8: bne.un.s IL_00fe + + IL_00fa: ldc.i4.0 + IL_00fb: nop + IL_00fc: br.s IL_0100 + + IL_00fe: ldc.i4.1 + IL_00ff: nop + IL_0100: call !!0 [FSharp.Core]Microsoft.FSharp.Core.Operators::Exit(int32) + IL_0105: pop + IL_0106: ret } } diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd04.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOn.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd04.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOn.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd04.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd04.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd04.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd05.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd05.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd05.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd05.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd05.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOff.il.bsl similarity index 97% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd05.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOff.il.bsl index 7ac415a7ea3..46de1e41e75 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd05.fs.il.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOff.il.bsl @@ -43,8 +43,7 @@ extends [runtime]System.Object { .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public specialname static int32[] - get_r() cil managed + .method public specialname static int32[] get_r() cil managed { .maxstack 8 @@ -52,8 +51,7 @@ IL_0005: ret } - .method public specialname static int32[] - get_w() cil managed + .method public specialname static int32[] get_w() cil managed { .maxstack 8 diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd05.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOff.opt.il.bsl similarity index 97% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd05.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOff.opt.il.bsl index 7ac415a7ea3..46de1e41e75 100644 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NonTrivialBranchingBindingInEnd05.fs.opt.il.bsl +++ b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOff.opt.il.bsl @@ -43,8 +43,7 @@ extends [runtime]System.Object { .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public specialname static int32[] - get_r() cil managed + .method public specialname static int32[] get_r() cil managed { .maxstack 8 @@ -52,8 +51,7 @@ IL_0005: ret } - .method public specialname static int32[] - get_w() cil managed + .method public specialname static int32[] get_w() cil managed { .maxstack 8 diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd05.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOn.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd05.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOn.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd05.fs.opt.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOn.opt.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd05.fs.opt.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/NonTrivialBranchingBindingInEnd05.fs.RealInternalSignatureOn.opt.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.net472.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.net472.debug.bsl deleted file mode 100644 index 9bd0a4ef373..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.net472.debug.bsl +++ /dev/null @@ -1,465 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed assembly - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .class auto ansi serializable sealed nested assembly beforefieldinit test6@38 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test6@38 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance int32 - Invoke(int32 x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: ldc.i4.1 - IL_0002: add - IL_0003: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test6@38::.ctor() - IL_0005: stsfld class assembly/test6@38 assembly/test6@38::@_instance - IL_000a: ret - } - - } - - .class auto ansi serializable sealed nested assembly beforefieldinit test7@47 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test7@47 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance int32 - Invoke(int32 x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: ldc.i4.1 - IL_0002: add - IL_0003: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test7@47::.ctor() - IL_0005: stsfld class assembly/test7@47 assembly/test7@47::@_instance - IL_000a: ret - } - - } - - .method public static void test1(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 lst) cil managed - { - - .maxstack 4 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldarg.0 - IL_0003: stloc.1 - IL_0004: ldloc.1 - IL_0005: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_000a: stloc.2 - IL_000b: br.s IL_0021 - - IL_000d: ldloc.1 - IL_000e: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0013: stloc.3 - IL_0014: ldloc.0 - IL_0015: ldloc.3 - IL_0016: add - IL_0017: stloc.0 - IL_0018: ldloc.2 - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: ldloc.2 - IL_0022: brtrue.s IL_000d - - IL_0024: ret - } - - .method public static void test2() cil managed - { - - .maxstack 6 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.1 - IL_0003: ldc.i4.2 - IL_0004: ldc.i4.3 - IL_0005: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000a: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000f: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0014: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: br.s IL_0037 - - IL_0023: ldloc.1 - IL_0024: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0029: stloc.3 - IL_002a: ldloc.0 - IL_002b: ldloc.3 - IL_002c: add - IL_002d: stloc.0 - IL_002e: ldloc.2 - IL_002f: stloc.1 - IL_0030: ldloc.1 - IL_0031: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0036: stloc.2 - IL_0037: ldloc.2 - IL_0038: brtrue.s IL_0023 - - IL_003a: ret - } - - .method public static void test3() cil managed - { - - .maxstack 6 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - int32 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_3, - int32 V_4) - IL_0000: ldc.i4.1 - IL_0001: ldc.i4.2 - IL_0002: ldc.i4.3 - IL_0003: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_0008: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0012: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0017: stloc.0 - IL_0018: ldc.i4.0 - IL_0019: stloc.1 - IL_001a: ldloc.0 - IL_001b: stloc.2 - IL_001c: ldloc.2 - IL_001d: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0022: stloc.3 - IL_0023: br.s IL_003b - - IL_0025: ldloc.2 - IL_0026: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_002b: stloc.s V_4 - IL_002d: ldloc.1 - IL_002e: ldloc.s V_4 - IL_0030: add - IL_0031: stloc.1 - IL_0032: ldloc.3 - IL_0033: stloc.2 - IL_0034: ldloc.2 - IL_0035: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_003a: stloc.3 - IL_003b: ldloc.3 - IL_003c: brtrue.s IL_0025 - - IL_003e: ret - } - - .method public static void test4() cil managed - { - - .maxstack 6 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_3, - int32 V_4) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.1 - IL_0003: ldc.i4.2 - IL_0004: ldc.i4.3 - IL_0005: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000a: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000f: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0014: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: stloc.2 - IL_001c: ldloc.2 - IL_001d: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0022: stloc.3 - IL_0023: br.s IL_003b - - IL_0025: ldloc.2 - IL_0026: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_002b: stloc.s V_4 - IL_002d: ldloc.0 - IL_002e: ldloc.s V_4 - IL_0030: add - IL_0031: stloc.0 - IL_0032: ldloc.3 - IL_0033: stloc.2 - IL_0034: ldloc.2 - IL_0035: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_003a: stloc.3 - IL_003b: ldloc.3 - IL_003c: brtrue.s IL_0025 - - IL_003e: ret - } - - .method public static void test5() cil managed - { - - .maxstack 6 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.1 - IL_0001: ldc.i4.2 - IL_0002: ldc.i4.3 - IL_0003: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_0008: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0012: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0017: stloc.0 - IL_0018: ldloc.0 - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: br.s IL_0049 - - IL_0023: ldloc.1 - IL_0024: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0029: stloc.3 - IL_002a: ldstr "%A" - IL_002f: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0034: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0039: ldloc.3 - IL_003a: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_003f: pop - IL_0040: ldloc.2 - IL_0041: stloc.1 - IL_0042: ldloc.1 - IL_0043: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0048: stloc.2 - IL_0049: ldloc.2 - IL_004a: brtrue.s IL_0023 - - IL_004c: ret - } - - .method public static void test6() cil managed - { - - .maxstack 8 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - int32 V_2) - IL_0000: ldsfld class assembly/test6@38 assembly/test6@38::@_instance - IL_0005: ldc.i4.1 - IL_0006: ldc.i4.2 - IL_0007: ldc.i4.3 - IL_0008: ldc.i4.4 - IL_0009: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000e: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0013: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0018: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_001d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0022: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0027: stloc.0 - IL_0028: ldloc.0 - IL_0029: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_002e: stloc.1 - IL_002f: br.s IL_0057 - - IL_0031: ldloc.0 - IL_0032: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0037: stloc.2 - IL_0038: ldstr "%O" - IL_003d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0042: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0047: ldloc.2 - IL_0048: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_004d: pop - IL_004e: ldloc.1 - IL_004f: stloc.0 - IL_0050: ldloc.0 - IL_0051: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0056: stloc.1 - IL_0057: ldloc.1 - IL_0058: brtrue.s IL_0031 - - IL_005a: ret - } - - .method public static void test7() cil managed - { - - .maxstack 8 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - int32 V_2, - int32 V_3) - IL_0000: ldsfld class assembly/test7@47 assembly/test7@47::@_instance - IL_0005: ldc.i4.1 - IL_0006: ldc.i4.2 - IL_0007: ldc.i4.3 - IL_0008: ldc.i4.4 - IL_0009: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000e: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0013: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0018: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_001d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0022: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0027: stloc.0 - IL_0028: ldloc.0 - IL_0029: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_002e: stloc.1 - IL_002f: br.s IL_005b - - IL_0031: ldloc.0 - IL_0032: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0037: stloc.2 - IL_0038: ldloc.2 - IL_0039: ldc.i4.1 - IL_003a: add - IL_003b: stloc.3 - IL_003c: ldstr "%O" - IL_0041: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0046: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_004b: ldloc.3 - IL_004c: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0051: pop - IL_0052: ldloc.1 - IL_0053: stloc.0 - IL_0054: ldloc.0 - IL_0055: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_005a: stloc.1 - IL_005b: ldloc.1 - IL_005c: brtrue.s IL_0031 - - IL_005e: ret - } - -} - -.class private abstract auto ansi sealed ''.$assembly - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.net472.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.net472.release.bsl deleted file mode 100644 index 626c68acbf7..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.net472.release.bsl +++ /dev/null @@ -1,485 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:0:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed assembly - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .class auto ansi serializable sealed nested assembly beforefieldinit test6@38 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test6@38 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance int32 - Invoke(int32 x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: ldc.i4.1 - IL_0002: add - IL_0003: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test6@38::.ctor() - IL_0005: stsfld class assembly/test6@38 assembly/test6@38::@_instance - IL_000a: ret - } - - } - - .class auto ansi serializable sealed nested assembly beforefieldinit test7@47 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test7@47 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance int32 - Invoke(int32 x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: ldc.i4.1 - IL_0002: add - IL_0003: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test7@47::.ctor() - IL_0005: stsfld class assembly/test7@47 assembly/test7@47::@_instance - IL_000a: ret - } - - } - - .method public static void test1(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 lst) cil managed - { - - .maxstack 4 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldarg.0 - IL_0003: stloc.1 - IL_0004: ldloc.1 - IL_0005: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_000a: stloc.2 - IL_000b: br.s IL_0021 - - IL_000d: ldloc.1 - IL_000e: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0013: stloc.3 - IL_0014: ldloc.0 - IL_0015: ldloc.3 - IL_0016: add - IL_0017: stloc.0 - IL_0018: ldloc.2 - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: ldloc.2 - IL_0022: brtrue.s IL_000d - - IL_0024: ret - } - - .method public static void test2() cil managed - { - - .maxstack 6 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.1 - IL_0003: ldc.i4.2 - IL_0004: ldc.i4.3 - IL_0005: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000a: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000f: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0014: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: br.s IL_0037 - - IL_0023: ldloc.1 - IL_0024: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0029: stloc.3 - IL_002a: ldloc.0 - IL_002b: ldloc.3 - IL_002c: add - IL_002d: stloc.0 - IL_002e: ldloc.2 - IL_002f: stloc.1 - IL_0030: ldloc.1 - IL_0031: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0036: stloc.2 - IL_0037: ldloc.2 - IL_0038: brtrue.s IL_0023 - - IL_003a: ret - } - - .method public static void test3() cil managed - { - - .maxstack 6 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - int32 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_3, - int32 V_4) - IL_0000: ldc.i4.1 - IL_0001: ldc.i4.2 - IL_0002: ldc.i4.3 - IL_0003: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_0008: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0012: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0017: stloc.0 - IL_0018: ldc.i4.0 - IL_0019: stloc.1 - IL_001a: ldloc.0 - IL_001b: stloc.2 - IL_001c: ldloc.2 - IL_001d: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0022: stloc.3 - IL_0023: br.s IL_003b - - IL_0025: ldloc.2 - IL_0026: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_002b: stloc.s V_4 - IL_002d: ldloc.1 - IL_002e: ldloc.s V_4 - IL_0030: add - IL_0031: stloc.1 - IL_0032: ldloc.3 - IL_0033: stloc.2 - IL_0034: ldloc.2 - IL_0035: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_003a: stloc.3 - IL_003b: ldloc.3 - IL_003c: brtrue.s IL_0025 - - IL_003e: ret - } - - .method public static void test4() cil managed - { - - .maxstack 6 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_3, - int32 V_4) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.1 - IL_0003: ldc.i4.2 - IL_0004: ldc.i4.3 - IL_0005: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000a: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000f: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0014: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: stloc.2 - IL_001c: ldloc.2 - IL_001d: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0022: stloc.3 - IL_0023: br.s IL_003b - - IL_0025: ldloc.2 - IL_0026: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_002b: stloc.s V_4 - IL_002d: ldloc.0 - IL_002e: ldloc.s V_4 - IL_0030: add - IL_0031: stloc.0 - IL_0032: ldloc.3 - IL_0033: stloc.2 - IL_0034: ldloc.2 - IL_0035: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_003a: stloc.3 - IL_003b: ldloc.3 - IL_003c: brtrue.s IL_0025 - - IL_003e: ret - } - - .method public static void test5() cil managed - { - - .maxstack 6 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_4) - IL_0000: ldc.i4.1 - IL_0001: ldc.i4.2 - IL_0002: ldc.i4.3 - IL_0003: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_0008: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0012: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0017: stloc.0 - IL_0018: ldloc.0 - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: br.s IL_0052 - - IL_0023: ldloc.1 - IL_0024: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0029: stloc.3 - IL_002a: ldstr "%A" - IL_002f: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0034: stloc.s V_4 - IL_0036: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_003b: ldloc.s V_4 - IL_003d: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter>(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0042: ldloc.3 - IL_0043: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0048: pop - IL_0049: ldloc.2 - IL_004a: stloc.1 - IL_004b: ldloc.1 - IL_004c: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0051: stloc.2 - IL_0052: ldloc.2 - IL_0053: brtrue.s IL_0023 - - IL_0055: ret - } - - .method public static void test6() cil managed - { - - .maxstack 8 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - int32 V_2, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_3) - IL_0000: ldsfld class assembly/test6@38 assembly/test6@38::@_instance - IL_0005: ldc.i4.1 - IL_0006: ldc.i4.2 - IL_0007: ldc.i4.3 - IL_0008: ldc.i4.4 - IL_0009: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000e: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0013: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0018: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_001d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0022: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0027: stloc.0 - IL_0028: ldloc.0 - IL_0029: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_002e: stloc.1 - IL_002f: br.s IL_005e - - IL_0031: ldloc.0 - IL_0032: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0037: stloc.2 - IL_0038: ldstr "%O" - IL_003d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0042: stloc.3 - IL_0043: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_0048: ldloc.3 - IL_0049: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter>(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_004e: ldloc.2 - IL_004f: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0054: pop - IL_0055: ldloc.1 - IL_0056: stloc.0 - IL_0057: ldloc.0 - IL_0058: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_005d: stloc.1 - IL_005e: ldloc.1 - IL_005f: brtrue.s IL_0031 - - IL_0061: ret - } - - .method public static void test7() cil managed - { - - .maxstack 8 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - int32 V_2, - int32 V_3, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_4) - IL_0000: ldsfld class assembly/test7@47 assembly/test7@47::@_instance - IL_0005: ldc.i4.1 - IL_0006: ldc.i4.2 - IL_0007: ldc.i4.3 - IL_0008: ldc.i4.4 - IL_0009: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000e: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0013: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0018: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_001d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0022: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0027: stloc.0 - IL_0028: ldloc.0 - IL_0029: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_002e: stloc.1 - IL_002f: br.s IL_0064 - - IL_0031: ldloc.0 - IL_0032: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0037: stloc.2 - IL_0038: ldloc.2 - IL_0039: ldc.i4.1 - IL_003a: add - IL_003b: stloc.3 - IL_003c: ldstr "%O" - IL_0041: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0046: stloc.s V_4 - IL_0048: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_004d: ldloc.s V_4 - IL_004f: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter>(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0054: ldloc.3 - IL_0055: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_005a: pop - IL_005b: ldloc.1 - IL_005c: stloc.0 - IL_005d: ldloc.0 - IL_005e: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0063: stloc.1 - IL_0064: ldloc.1 - IL_0065: brtrue.s IL_0031 - - IL_0067: ret - } - -} - -.class private abstract auto ansi sealed ''.$assembly - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.netcore.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.netcore.debug.bsl deleted file mode 100644 index 9bd0a4ef373..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnList01.fs.il.netcore.debug.bsl +++ /dev/null @@ -1,465 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed assembly - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .class auto ansi serializable sealed nested assembly beforefieldinit test6@38 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test6@38 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance int32 - Invoke(int32 x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: ldc.i4.1 - IL_0002: add - IL_0003: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test6@38::.ctor() - IL_0005: stsfld class assembly/test6@38 assembly/test6@38::@_instance - IL_000a: ret - } - - } - - .class auto ansi serializable sealed nested assembly beforefieldinit test7@47 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test7@47 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance int32 - Invoke(int32 x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: ldc.i4.1 - IL_0002: add - IL_0003: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test7@47::.ctor() - IL_0005: stsfld class assembly/test7@47 assembly/test7@47::@_instance - IL_000a: ret - } - - } - - .method public static void test1(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 lst) cil managed - { - - .maxstack 4 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldarg.0 - IL_0003: stloc.1 - IL_0004: ldloc.1 - IL_0005: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_000a: stloc.2 - IL_000b: br.s IL_0021 - - IL_000d: ldloc.1 - IL_000e: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0013: stloc.3 - IL_0014: ldloc.0 - IL_0015: ldloc.3 - IL_0016: add - IL_0017: stloc.0 - IL_0018: ldloc.2 - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: ldloc.2 - IL_0022: brtrue.s IL_000d - - IL_0024: ret - } - - .method public static void test2() cil managed - { - - .maxstack 6 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.1 - IL_0003: ldc.i4.2 - IL_0004: ldc.i4.3 - IL_0005: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000a: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000f: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0014: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: br.s IL_0037 - - IL_0023: ldloc.1 - IL_0024: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0029: stloc.3 - IL_002a: ldloc.0 - IL_002b: ldloc.3 - IL_002c: add - IL_002d: stloc.0 - IL_002e: ldloc.2 - IL_002f: stloc.1 - IL_0030: ldloc.1 - IL_0031: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0036: stloc.2 - IL_0037: ldloc.2 - IL_0038: brtrue.s IL_0023 - - IL_003a: ret - } - - .method public static void test3() cil managed - { - - .maxstack 6 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - int32 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_3, - int32 V_4) - IL_0000: ldc.i4.1 - IL_0001: ldc.i4.2 - IL_0002: ldc.i4.3 - IL_0003: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_0008: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0012: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0017: stloc.0 - IL_0018: ldc.i4.0 - IL_0019: stloc.1 - IL_001a: ldloc.0 - IL_001b: stloc.2 - IL_001c: ldloc.2 - IL_001d: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0022: stloc.3 - IL_0023: br.s IL_003b - - IL_0025: ldloc.2 - IL_0026: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_002b: stloc.s V_4 - IL_002d: ldloc.1 - IL_002e: ldloc.s V_4 - IL_0030: add - IL_0031: stloc.1 - IL_0032: ldloc.3 - IL_0033: stloc.2 - IL_0034: ldloc.2 - IL_0035: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_003a: stloc.3 - IL_003b: ldloc.3 - IL_003c: brtrue.s IL_0025 - - IL_003e: ret - } - - .method public static void test4() cil managed - { - - .maxstack 6 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_3, - int32 V_4) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.1 - IL_0003: ldc.i4.2 - IL_0004: ldc.i4.3 - IL_0005: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000a: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000f: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0014: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: stloc.2 - IL_001c: ldloc.2 - IL_001d: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0022: stloc.3 - IL_0023: br.s IL_003b - - IL_0025: ldloc.2 - IL_0026: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_002b: stloc.s V_4 - IL_002d: ldloc.0 - IL_002e: ldloc.s V_4 - IL_0030: add - IL_0031: stloc.0 - IL_0032: ldloc.3 - IL_0033: stloc.2 - IL_0034: ldloc.2 - IL_0035: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_003a: stloc.3 - IL_003b: ldloc.3 - IL_003c: brtrue.s IL_0025 - - IL_003e: ret - } - - .method public static void test5() cil managed - { - - .maxstack 6 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.1 - IL_0001: ldc.i4.2 - IL_0002: ldc.i4.3 - IL_0003: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_0008: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0012: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0017: stloc.0 - IL_0018: ldloc.0 - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: br.s IL_0049 - - IL_0023: ldloc.1 - IL_0024: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0029: stloc.3 - IL_002a: ldstr "%A" - IL_002f: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0034: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0039: ldloc.3 - IL_003a: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_003f: pop - IL_0040: ldloc.2 - IL_0041: stloc.1 - IL_0042: ldloc.1 - IL_0043: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0048: stloc.2 - IL_0049: ldloc.2 - IL_004a: brtrue.s IL_0023 - - IL_004c: ret - } - - .method public static void test6() cil managed - { - - .maxstack 8 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - int32 V_2) - IL_0000: ldsfld class assembly/test6@38 assembly/test6@38::@_instance - IL_0005: ldc.i4.1 - IL_0006: ldc.i4.2 - IL_0007: ldc.i4.3 - IL_0008: ldc.i4.4 - IL_0009: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000e: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0013: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0018: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_001d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0022: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0027: stloc.0 - IL_0028: ldloc.0 - IL_0029: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_002e: stloc.1 - IL_002f: br.s IL_0057 - - IL_0031: ldloc.0 - IL_0032: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0037: stloc.2 - IL_0038: ldstr "%O" - IL_003d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0042: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0047: ldloc.2 - IL_0048: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_004d: pop - IL_004e: ldloc.1 - IL_004f: stloc.0 - IL_0050: ldloc.0 - IL_0051: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0056: stloc.1 - IL_0057: ldloc.1 - IL_0058: brtrue.s IL_0031 - - IL_005a: ret - } - - .method public static void test7() cil managed - { - - .maxstack 8 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - int32 V_2, - int32 V_3) - IL_0000: ldsfld class assembly/test7@47 assembly/test7@47::@_instance - IL_0005: ldc.i4.1 - IL_0006: ldc.i4.2 - IL_0007: ldc.i4.3 - IL_0008: ldc.i4.4 - IL_0009: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000e: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0013: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0018: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_001d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0022: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0027: stloc.0 - IL_0028: ldloc.0 - IL_0029: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_002e: stloc.1 - IL_002f: br.s IL_005b - - IL_0031: ldloc.0 - IL_0032: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0037: stloc.2 - IL_0038: ldloc.2 - IL_0039: ldc.i4.1 - IL_003a: add - IL_003b: stloc.3 - IL_003c: ldstr "%O" - IL_0041: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0046: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_004b: ldloc.3 - IL_004c: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0051: pop - IL_0052: ldloc.1 - IL_0053: stloc.0 - IL_0054: ldloc.0 - IL_0055: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_005a: stloc.1 - IL_005b: ldloc.1 - IL_005c: brtrue.s IL_0031 - - IL_005e: ret - } - -} - -.class private abstract auto ansi sealed ''.$assembly - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.net472.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.net472.debug.bsl deleted file mode 100644 index e0dc7ca6f63..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.net472.debug.bsl +++ /dev/null @@ -1,556 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:0:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed assembly - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .class auto ansi serializable sealed nested assembly beforefieldinit test8@54 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test8@54 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance char - Invoke(char x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: conv.i4 - IL_0002: ldc.i4.1 - IL_0003: add - IL_0004: conv.u2 - IL_0005: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test8@54::.ctor() - IL_0005: stsfld class assembly/test8@54 assembly/test8@54::@_instance - IL_000a: ret - } - - } - - .class auto ansi serializable sealed nested assembly beforefieldinit test9@63 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test9@63 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance char - Invoke(char x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: conv.i4 - IL_0002: ldc.i4.1 - IL_0003: add - IL_0004: conv.u2 - IL_0005: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test9@63::.ctor() - IL_0005: stsfld class assembly/test9@63 assembly/test9@63::@_instance - IL_000a: ret - } - - } - - .method public static void test1(string str) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldarg.0 - IL_0005: callvirt instance int32 [runtime]System.String::get_Length() - IL_000a: ldc.i4.1 - IL_000b: sub - IL_000c: stloc.1 - IL_000d: ldloc.1 - IL_000e: ldloc.2 - IL_000f: blt.s IL_0028 - - IL_0011: ldarg.0 - IL_0012: ldloc.2 - IL_0013: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0018: stloc.3 - IL_0019: ldloc.0 - IL_001a: ldloc.3 - IL_001b: conv.i4 - IL_001c: add - IL_001d: stloc.0 - IL_001e: ldloc.2 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: stloc.2 - IL_0022: ldloc.2 - IL_0023: ldloc.1 - IL_0024: ldc.i4.1 - IL_0025: add - IL_0026: bne.un.s IL_0011 - - IL_0028: ret - } - - .method public static void test2() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldstr "123" - IL_0009: callvirt instance int32 [runtime]System.String::get_Length() - IL_000e: ldc.i4.1 - IL_000f: sub - IL_0010: stloc.1 - IL_0011: ldloc.1 - IL_0012: ldloc.2 - IL_0013: blt.s IL_0030 - - IL_0015: ldstr "123" - IL_001a: ldloc.2 - IL_001b: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0020: stloc.3 - IL_0021: ldloc.0 - IL_0022: ldloc.3 - IL_0023: conv.i4 - IL_0024: add - IL_0025: stloc.0 - IL_0026: ldloc.2 - IL_0027: ldc.i4.1 - IL_0028: add - IL_0029: stloc.2 - IL_002a: ldloc.2 - IL_002b: ldloc.1 - IL_002c: ldc.i4.1 - IL_002d: add - IL_002e: bne.un.s IL_0015 - - IL_0030: ret - } - - .method public static void test3() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.0 - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test4() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: nop - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test5() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - char V_2) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.1 - IL_0003: ldstr "123" - IL_0008: callvirt instance int32 [runtime]System.String::get_Length() - IL_000d: ldc.i4.1 - IL_000e: sub - IL_000f: stloc.0 - IL_0010: ldloc.0 - IL_0011: ldloc.1 - IL_0012: blt.s IL_0040 - - IL_0014: ldstr "123" - IL_0019: ldloc.1 - IL_001a: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_001f: stloc.2 - IL_0020: ldstr "%A" - IL_0025: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,char>::.ctor(string) - IL_002a: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_002f: ldloc.2 - IL_0030: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0035: pop - IL_0036: ldloc.1 - IL_0037: ldc.i4.1 - IL_0038: add - IL_0039: stloc.1 - IL_003a: ldloc.1 - IL_003b: ldloc.0 - IL_003c: ldc.i4.1 - IL_003d: add - IL_003e: bne.un.s IL_0014 - - IL_0040: ret - } - - .method public static void test6(string str) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldarg.0 - IL_0005: callvirt instance int32 [runtime]System.String::get_Length() - IL_000a: ldc.i4.1 - IL_000b: sub - IL_000c: stloc.1 - IL_000d: ldloc.1 - IL_000e: ldloc.2 - IL_000f: blt.s IL_0028 - - IL_0011: ldarg.0 - IL_0012: ldloc.2 - IL_0013: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0018: stloc.3 - IL_0019: ldloc.0 - IL_001a: ldloc.3 - IL_001b: conv.i4 - IL_001c: add - IL_001d: stloc.0 - IL_001e: ldloc.2 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: stloc.2 - IL_0022: ldloc.2 - IL_0023: ldloc.1 - IL_0024: ldc.i4.1 - IL_0025: add - IL_0026: bne.un.s IL_0011 - - IL_0028: ret - } - - .method public static void test7() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.0 - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test8() cil managed - { - - .maxstack 5 - .locals init (string V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldsfld class assembly/test8@54 assembly/test8@54::@_instance - IL_0005: ldstr "1234" - IL_000a: call string [FSharp.Core]Microsoft.FSharp.Core.StringModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - string) - IL_000f: stloc.0 - IL_0010: ldc.i4.0 - IL_0011: stloc.2 - IL_0012: ldloc.0 - IL_0013: callvirt instance int32 [runtime]System.String::get_Length() - IL_0018: ldc.i4.1 - IL_0019: sub - IL_001a: stloc.1 - IL_001b: ldloc.1 - IL_001c: ldloc.2 - IL_001d: blt.s IL_0047 - - IL_001f: ldloc.0 - IL_0020: ldloc.2 - IL_0021: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0026: stloc.3 - IL_0027: ldstr "%O" - IL_002c: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,char>::.ctor(string) - IL_0031: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0036: ldloc.3 - IL_0037: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_003c: pop - IL_003d: ldloc.2 - IL_003e: ldc.i4.1 - IL_003f: add - IL_0040: stloc.2 - IL_0041: ldloc.2 - IL_0042: ldloc.1 - IL_0043: ldc.i4.1 - IL_0044: add - IL_0045: bne.un.s IL_001f - - IL_0047: ret - } - - .method public static void test9() cil managed - { - - .maxstack 5 - .locals init (string V_0, - int32 V_1, - int32 V_2, - char V_3, - string V_4) - IL_0000: ldsfld class assembly/test9@63 assembly/test9@63::@_instance - IL_0005: ldstr "1234" - IL_000a: call string [FSharp.Core]Microsoft.FSharp.Core.StringModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - string) - IL_000f: stloc.0 - IL_0010: ldc.i4.0 - IL_0011: stloc.2 - IL_0012: ldloc.0 - IL_0013: callvirt instance int32 [runtime]System.String::get_Length() - IL_0018: ldc.i4.1 - IL_0019: sub - IL_001a: stloc.1 - IL_001b: ldloc.1 - IL_001c: ldloc.2 - IL_001d: blt.s IL_005a - - IL_001f: ldloc.0 - IL_0020: ldloc.2 - IL_0021: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0026: stloc.3 - IL_0027: ldstr "{0} foo" - IL_002c: ldloc.3 - IL_002d: box [runtime]System.Char - IL_0032: call string [runtime]System.String::Format(string, - object) - IL_0037: stloc.s V_4 - IL_0039: ldstr "%O" - IL_003e: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string>::.ctor(string) - IL_0043: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0048: ldloc.s V_4 - IL_004a: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_004f: pop - IL_0050: ldloc.2 - IL_0051: ldc.i4.1 - IL_0052: add - IL_0053: stloc.2 - IL_0054: ldloc.2 - IL_0055: ldloc.1 - IL_0056: ldc.i4.1 - IL_0057: add - IL_0058: bne.un.s IL_001f - - IL_005a: ret - } - -} - -.class private abstract auto ansi sealed ''.$assembly - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.net472.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.net472.release.bsl deleted file mode 100644 index 438815ac15a..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.net472.release.bsl +++ /dev/null @@ -1,571 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:0:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed assembly - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .class auto ansi serializable sealed nested assembly beforefieldinit test8@54 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test8@54 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance char - Invoke(char x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: conv.i4 - IL_0002: ldc.i4.1 - IL_0003: add - IL_0004: conv.u2 - IL_0005: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test8@54::.ctor() - IL_0005: stsfld class assembly/test8@54 assembly/test8@54::@_instance - IL_000a: ret - } - - } - - .class auto ansi serializable sealed nested assembly beforefieldinit test9@63 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test9@63 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance char - Invoke(char x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: conv.i4 - IL_0002: ldc.i4.1 - IL_0003: add - IL_0004: conv.u2 - IL_0005: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test9@63::.ctor() - IL_0005: stsfld class assembly/test9@63 assembly/test9@63::@_instance - IL_000a: ret - } - - } - - .method public static void test1(string str) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldarg.0 - IL_0005: callvirt instance int32 [runtime]System.String::get_Length() - IL_000a: ldc.i4.1 - IL_000b: sub - IL_000c: stloc.1 - IL_000d: ldloc.1 - IL_000e: ldloc.2 - IL_000f: blt.s IL_0028 - - IL_0011: ldarg.0 - IL_0012: ldloc.2 - IL_0013: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0018: stloc.3 - IL_0019: ldloc.0 - IL_001a: ldloc.3 - IL_001b: conv.i4 - IL_001c: add - IL_001d: stloc.0 - IL_001e: ldloc.2 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: stloc.2 - IL_0022: ldloc.2 - IL_0023: ldloc.1 - IL_0024: ldc.i4.1 - IL_0025: add - IL_0026: bne.un.s IL_0011 - - IL_0028: ret - } - - .method public static void test2() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldstr "123" - IL_0009: callvirt instance int32 [runtime]System.String::get_Length() - IL_000e: ldc.i4.1 - IL_000f: sub - IL_0010: stloc.1 - IL_0011: ldloc.1 - IL_0012: ldloc.2 - IL_0013: blt.s IL_0030 - - IL_0015: ldstr "123" - IL_001a: ldloc.2 - IL_001b: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0020: stloc.3 - IL_0021: ldloc.0 - IL_0022: ldloc.3 - IL_0023: conv.i4 - IL_0024: add - IL_0025: stloc.0 - IL_0026: ldloc.2 - IL_0027: ldc.i4.1 - IL_0028: add - IL_0029: stloc.2 - IL_002a: ldloc.2 - IL_002b: ldloc.1 - IL_002c: ldc.i4.1 - IL_002d: add - IL_002e: bne.un.s IL_0015 - - IL_0030: ret - } - - .method public static void test3() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.0 - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test4() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: nop - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test5() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - char V_2, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.1 - IL_0003: ldstr "123" - IL_0008: callvirt instance int32 [runtime]System.String::get_Length() - IL_000d: ldc.i4.1 - IL_000e: sub - IL_000f: stloc.0 - IL_0010: ldloc.0 - IL_0011: ldloc.1 - IL_0012: blt.s IL_0047 - - IL_0014: ldstr "123" - IL_0019: ldloc.1 - IL_001a: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_001f: stloc.2 - IL_0020: ldstr "%A" - IL_0025: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,char>::.ctor(string) - IL_002a: stloc.3 - IL_002b: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_0030: ldloc.3 - IL_0031: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter>(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0036: ldloc.2 - IL_0037: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_003c: pop - IL_003d: ldloc.1 - IL_003e: ldc.i4.1 - IL_003f: add - IL_0040: stloc.1 - IL_0041: ldloc.1 - IL_0042: ldloc.0 - IL_0043: ldc.i4.1 - IL_0044: add - IL_0045: bne.un.s IL_0014 - - IL_0047: ret - } - - .method public static void test6(string str) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldarg.0 - IL_0005: callvirt instance int32 [runtime]System.String::get_Length() - IL_000a: ldc.i4.1 - IL_000b: sub - IL_000c: stloc.1 - IL_000d: ldloc.1 - IL_000e: ldloc.2 - IL_000f: blt.s IL_0028 - - IL_0011: ldarg.0 - IL_0012: ldloc.2 - IL_0013: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0018: stloc.3 - IL_0019: ldloc.0 - IL_001a: ldloc.3 - IL_001b: conv.i4 - IL_001c: add - IL_001d: stloc.0 - IL_001e: ldloc.2 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: stloc.2 - IL_0022: ldloc.2 - IL_0023: ldloc.1 - IL_0024: ldc.i4.1 - IL_0025: add - IL_0026: bne.un.s IL_0011 - - IL_0028: ret - } - - .method public static void test7() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.0 - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test8() cil managed - { - - .maxstack 5 - .locals init (string V_0, - int32 V_1, - int32 V_2, - char V_3, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_4) - IL_0000: ldsfld class assembly/test8@54 assembly/test8@54::@_instance - IL_0005: ldstr "1234" - IL_000a: call string [FSharp.Core]Microsoft.FSharp.Core.StringModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - string) - IL_000f: stloc.0 - IL_0010: ldc.i4.0 - IL_0011: stloc.2 - IL_0012: ldloc.0 - IL_0013: callvirt instance int32 [runtime]System.String::get_Length() - IL_0018: ldc.i4.1 - IL_0019: sub - IL_001a: stloc.1 - IL_001b: ldloc.1 - IL_001c: ldloc.2 - IL_001d: blt.s IL_0050 - - IL_001f: ldloc.0 - IL_0020: ldloc.2 - IL_0021: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0026: stloc.3 - IL_0027: ldstr "%O" - IL_002c: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,char>::.ctor(string) - IL_0031: stloc.s V_4 - IL_0033: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_0038: ldloc.s V_4 - IL_003a: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter>(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_003f: ldloc.3 - IL_0040: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0045: pop - IL_0046: ldloc.2 - IL_0047: ldc.i4.1 - IL_0048: add - IL_0049: stloc.2 - IL_004a: ldloc.2 - IL_004b: ldloc.1 - IL_004c: ldc.i4.1 - IL_004d: add - IL_004e: bne.un.s IL_001f - - IL_0050: ret - } - - .method public static void test9() cil managed - { - - .maxstack 5 - .locals init (string V_0, - int32 V_1, - int32 V_2, - char V_3, - string V_4, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_5) - IL_0000: ldsfld class assembly/test9@63 assembly/test9@63::@_instance - IL_0005: ldstr "1234" - IL_000a: call string [FSharp.Core]Microsoft.FSharp.Core.StringModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - string) - IL_000f: stloc.0 - IL_0010: ldc.i4.0 - IL_0011: stloc.2 - IL_0012: ldloc.0 - IL_0013: callvirt instance int32 [runtime]System.String::get_Length() - IL_0018: ldc.i4.1 - IL_0019: sub - IL_001a: stloc.1 - IL_001b: ldloc.1 - IL_001c: ldloc.2 - IL_001d: blt.s IL_0063 - - IL_001f: ldloc.0 - IL_0020: ldloc.2 - IL_0021: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0026: stloc.3 - IL_0027: ldstr "{0} foo" - IL_002c: ldloc.3 - IL_002d: box [runtime]System.Char - IL_0032: call string [runtime]System.String::Format(string, - object) - IL_0037: stloc.s V_4 - IL_0039: ldstr "%O" - IL_003e: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string>::.ctor(string) - IL_0043: stloc.s V_5 - IL_0045: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_004a: ldloc.s V_5 - IL_004c: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter>(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0051: ldloc.s V_4 - IL_0053: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0058: pop - IL_0059: ldloc.2 - IL_005a: ldc.i4.1 - IL_005b: add - IL_005c: stloc.2 - IL_005d: ldloc.2 - IL_005e: ldloc.1 - IL_005f: ldc.i4.1 - IL_0060: add - IL_0061: bne.un.s IL_001f - - IL_0063: ret - } - -} - -.class private abstract auto ansi sealed ''.$assembly - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.netcore.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.netcore.debug.bsl deleted file mode 100644 index c56fef87382..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForEachOnString01.fs.il.netcore.debug.bsl +++ /dev/null @@ -1,556 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:1:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed assembly - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .class auto ansi serializable sealed nested assembly beforefieldinit test8@54 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test8@54 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance char - Invoke(char x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: conv.i4 - IL_0002: ldc.i4.1 - IL_0003: add - IL_0004: conv.u2 - IL_0005: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test8@54::.ctor() - IL_0005: stsfld class assembly/test8@54 assembly/test8@54::@_instance - IL_000a: ret - } - - } - - .class auto ansi serializable sealed nested assembly beforefieldinit test9@63 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test9@63 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance char - Invoke(char x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: conv.i4 - IL_0002: ldc.i4.1 - IL_0003: add - IL_0004: conv.u2 - IL_0005: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test9@63::.ctor() - IL_0005: stsfld class assembly/test9@63 assembly/test9@63::@_instance - IL_000a: ret - } - - } - - .method public static void test1(string str) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldarg.0 - IL_0005: callvirt instance int32 [runtime]System.String::get_Length() - IL_000a: ldc.i4.1 - IL_000b: sub - IL_000c: stloc.1 - IL_000d: ldloc.1 - IL_000e: ldloc.2 - IL_000f: blt.s IL_0028 - - IL_0011: ldarg.0 - IL_0012: ldloc.2 - IL_0013: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0018: stloc.3 - IL_0019: ldloc.0 - IL_001a: ldloc.3 - IL_001b: conv.i4 - IL_001c: add - IL_001d: stloc.0 - IL_001e: ldloc.2 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: stloc.2 - IL_0022: ldloc.2 - IL_0023: ldloc.1 - IL_0024: ldc.i4.1 - IL_0025: add - IL_0026: bne.un.s IL_0011 - - IL_0028: ret - } - - .method public static void test2() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldstr "123" - IL_0009: callvirt instance int32 [runtime]System.String::get_Length() - IL_000e: ldc.i4.1 - IL_000f: sub - IL_0010: stloc.1 - IL_0011: ldloc.1 - IL_0012: ldloc.2 - IL_0013: blt.s IL_0030 - - IL_0015: ldstr "123" - IL_001a: ldloc.2 - IL_001b: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0020: stloc.3 - IL_0021: ldloc.0 - IL_0022: ldloc.3 - IL_0023: conv.i4 - IL_0024: add - IL_0025: stloc.0 - IL_0026: ldloc.2 - IL_0027: ldc.i4.1 - IL_0028: add - IL_0029: stloc.2 - IL_002a: ldloc.2 - IL_002b: ldloc.1 - IL_002c: ldc.i4.1 - IL_002d: add - IL_002e: bne.un.s IL_0015 - - IL_0030: ret - } - - .method public static void test3() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.0 - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test4() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: nop - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test5() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - char V_2) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.1 - IL_0003: ldstr "123" - IL_0008: callvirt instance int32 [runtime]System.String::get_Length() - IL_000d: ldc.i4.1 - IL_000e: sub - IL_000f: stloc.0 - IL_0010: ldloc.0 - IL_0011: ldloc.1 - IL_0012: blt.s IL_0040 - - IL_0014: ldstr "123" - IL_0019: ldloc.1 - IL_001a: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_001f: stloc.2 - IL_0020: ldstr "%A" - IL_0025: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,char>::.ctor(string) - IL_002a: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_002f: ldloc.2 - IL_0030: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0035: pop - IL_0036: ldloc.1 - IL_0037: ldc.i4.1 - IL_0038: add - IL_0039: stloc.1 - IL_003a: ldloc.1 - IL_003b: ldloc.0 - IL_003c: ldc.i4.1 - IL_003d: add - IL_003e: bne.un.s IL_0014 - - IL_0040: ret - } - - .method public static void test6(string str) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldarg.0 - IL_0005: callvirt instance int32 [runtime]System.String::get_Length() - IL_000a: ldc.i4.1 - IL_000b: sub - IL_000c: stloc.1 - IL_000d: ldloc.1 - IL_000e: ldloc.2 - IL_000f: blt.s IL_0028 - - IL_0011: ldarg.0 - IL_0012: ldloc.2 - IL_0013: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0018: stloc.3 - IL_0019: ldloc.0 - IL_001a: ldloc.3 - IL_001b: conv.i4 - IL_001c: add - IL_001d: stloc.0 - IL_001e: ldloc.2 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: stloc.2 - IL_0022: ldloc.2 - IL_0023: ldloc.1 - IL_0024: ldc.i4.1 - IL_0025: add - IL_0026: bne.un.s IL_0011 - - IL_0028: ret - } - - .method public static void test7() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.0 - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test8() cil managed - { - - .maxstack 5 - .locals init (string V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldsfld class assembly/test8@54 assembly/test8@54::@_instance - IL_0005: ldstr "1234" - IL_000a: call string [FSharp.Core]Microsoft.FSharp.Core.StringModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - string) - IL_000f: stloc.0 - IL_0010: ldc.i4.0 - IL_0011: stloc.2 - IL_0012: ldloc.0 - IL_0013: callvirt instance int32 [runtime]System.String::get_Length() - IL_0018: ldc.i4.1 - IL_0019: sub - IL_001a: stloc.1 - IL_001b: ldloc.1 - IL_001c: ldloc.2 - IL_001d: blt.s IL_0047 - - IL_001f: ldloc.0 - IL_0020: ldloc.2 - IL_0021: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0026: stloc.3 - IL_0027: ldstr "%O" - IL_002c: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,char>::.ctor(string) - IL_0031: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0036: ldloc.3 - IL_0037: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_003c: pop - IL_003d: ldloc.2 - IL_003e: ldc.i4.1 - IL_003f: add - IL_0040: stloc.2 - IL_0041: ldloc.2 - IL_0042: ldloc.1 - IL_0043: ldc.i4.1 - IL_0044: add - IL_0045: bne.un.s IL_001f - - IL_0047: ret - } - - .method public static void test9() cil managed - { - - .maxstack 5 - .locals init (string V_0, - int32 V_1, - int32 V_2, - char V_3, - string V_4) - IL_0000: ldsfld class assembly/test9@63 assembly/test9@63::@_instance - IL_0005: ldstr "1234" - IL_000a: call string [FSharp.Core]Microsoft.FSharp.Core.StringModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - string) - IL_000f: stloc.0 - IL_0010: ldc.i4.0 - IL_0011: stloc.2 - IL_0012: ldloc.0 - IL_0013: callvirt instance int32 [runtime]System.String::get_Length() - IL_0018: ldc.i4.1 - IL_0019: sub - IL_001a: stloc.1 - IL_001b: ldloc.1 - IL_001c: ldloc.2 - IL_001d: blt.s IL_005a - - IL_001f: ldloc.0 - IL_0020: ldloc.2 - IL_0021: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0026: stloc.3 - IL_0027: ldstr "{0} foo" - IL_002c: ldloc.3 - IL_002d: box [runtime]System.Char - IL_0032: call string [runtime]System.String::Format(string, - object) - IL_0037: stloc.s V_4 - IL_0039: ldstr "%O" - IL_003e: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string>::.ctor(string) - IL_0043: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0048: ldloc.s V_4 - IL_004a: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_004f: pop - IL_0050: ldloc.2 - IL_0051: ldc.i4.1 - IL_0052: add - IL_0053: stloc.2 - IL_0054: ldloc.2 - IL_0055: ldloc.1 - IL_0056: ldc.i4.1 - IL_0057: add - IL_0058: bne.un.s IL_001f - - IL_005a: ret - } - -} - -.class private abstract auto ansi sealed ''.$assembly - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForLoop.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForLoop.fs deleted file mode 100644 index 69d37924d10..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ForLoop.fs +++ /dev/null @@ -1,216 +0,0 @@ -namespace EmittedIL.RealInternalSignature - -open Xunit -open FSharp.Test -open FSharp.Test.Compiler - -module ForLoopRealInternalSignatureOff = - - let verifyCompilation compilation = - compilation - |> withOptions [ "--test:EmitFeeFeeAs100001" ] - |> asExe - |> withOptimize - |> withEmbeddedPdb - |> withEmbedAllSource - |> ignoreWarnings - |> withRealInternalSignatureOff - |> verifyILBaseline - - // SOURCE=NoAllocationOfTuple01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoAllocationOfTuple01.dll" # NoAllocationOfTuple01.fs - [] - let ``NoAllocationOfTuple01_fs`` compilation = - compilation - |> verifyCompilation - - // SOURCE=ForEachOnArray01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ForEachOnArray01.dll" # ForEachOnArray01.fs - [] - let ``ForEachOnArray01_fs`` compilation = - compilation - |> verifyCompilation - - // SOURCE=ForEachOnList01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ForEachOnList01.dll" # ForEachOnList01.fs - [] - let ``ForEachOnList01_fs`` compilation = - compilation - |> verifyCompilation - - // SOURCE=ForEachOnString01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ForEachOnString01.dll" # ForEachOnString01.fs - [] - let ``ForEachOnString01_fs`` compilation = - compilation - |> verifyCompilation - - // SOURCE=ZeroToArrLength01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ZeroToArrLength01.dll" # ZeroToArrLength01.fs - [] - let ``ZeroToArrLength01_fs`` compilation = - compilation - |> verifyCompilation - - // SOURCE=ZeroToArrLength02.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ZeroToArrLength02.dll" # ZeroToArrLength02.fs - [] - let ``ZeroToArrLength02_fs`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NoIEnumerable01.fsx SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoIEnumerable01.dll" # NoIEnumerable01.fsx - [] - let ``NoIEnumerable01_fsx`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NoIEnumerable02.fsx SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoIEnumerable02.dll" # NoIEnumerable02.fsx - [] - let ``NoIEnumerable02_fsx`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NoIEnumerable03.fsx SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoIEnumerable03.dll" # NoIEnumerable03.fsx - [] - let ``NoIEnumerable03_fsx`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd01.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd01.fs --optimize+ - [] - let ``NonTrivialBranchingBindingInEnd01_fs_opt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd01.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd01.fs --optimize- - [] - let ``NonTrivialBranchingBindingInEnd01_fs_nonopt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd02.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd02.fs --optimize+ - [] - let ``NonTrivialBranchingBindingInEnd02_fs_opt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd02.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd02.fs --optimize- - [] - let ``NonTrivialBranchingBindingInEnd02_fs_nonopt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd03.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd03.fs --optimize+ - [] - let ``NonTrivialBranchingBindingInEnd03_fs_opt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd03.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd03.fs --optimize- - [] - let ``NonTrivialBranchingBindingInEnd03_fs_nonopt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd04.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd04.fs --optimize+ - [] - let ``NonTrivialBranchingBindingInEnd04_fs_opt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd04.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd04.fs --optimize- - [] - let ``NonTrivialBranchingBindingInEnd04_fs_nonopt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd05.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd05.fs --optimize+ - [] - let ``NonTrivialBranchingBindingInEnd05_fs_opt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd05.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd05.fs --optimize- - [] - let ``NonTrivialBranchingBindingInEnd05_fs_nonopt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=ForEachRangeStepSByte.fs SCFLAGS="--optimize+" # ForEachRangeStepSByte.fs --optimize+ - [] - let ``ForEachRangeStepSByte_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepByte.fs SCFLAGS="--optimize+" # ForEachRangeStepByte.fs --optimize+ - [] - let ``ForEachRangeStepByte_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepChar.fs SCFLAGS="--optimize+" # ForEachRangeStepChar.fs --optimize+ - [] - let ``ForEachRangeStepChar_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepInt16.fs SCFLAGS="--optimize+" # ForEachRangeStepInt16.fs --optimize+ - [] - let ``ForEachRangeStepInt16_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepUInt16.fs SCFLAGS="--optimize+" # ForEachRangeStepUInt16.fs --optimize+ - [] - let ``ForEachRangeStepUInt16_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepInt32.fs SCFLAGS="--optimize+" # ForEachRangeStepInt32.fs --optimize+ - [] - let ``ForEachRangeStepInt32_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepUInt32.fs SCFLAGS="--optimize+" # ForEachRangeStepUInt32.fs --optimize+ - [] - let ``ForEachRangeStepUInt32_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepInt64.fs SCFLAGS="--optimize+" # ForEachRangeStepInt64.fs --optimize+ - [] - let ``ForEachRangeStepInt64_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepUInt64.fs SCFLAGS="--optimize+" # ForEachRangeStepUInt64.fs --optimize+ - [] - let ``ForEachRangeStepUInt64_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepIntPtr.fs SCFLAGS="--optimize+" # ForEachRangeStepIntPtr.fs --optimize+ - [] - let ``ForEachRangeStepIntPtr_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepUIntPtr.fs SCFLAGS="--optimize+" # ForEachRangeStepUIntPtr.fs --optimize+ - [] - let ``ForEachRangeStepUIntPtr_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStep_UnitsOfMeasure.fs SCFLAGS="--optimize+" # ForEachRangeStep_UnitsOfMeasure.fs --optimize+ - [] - let ``ForEachRangeStep_UnitsOfMeasure_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.net472.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.net472.debug.bsl deleted file mode 100644 index 4c0acb5b6ba..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.net472.debug.bsl +++ /dev/null @@ -1,96 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop1(int32 N) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1) - IL_0000: ldc.i4.1 - IL_0001: stloc.1 - IL_0002: ldarg.0 - IL_0003: stloc.0 - IL_0004: ldloc.0 - IL_0005: ldloc.1 - IL_0006: blt.s IL_0022 - - IL_0008: ldstr "aaa" - IL_000d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0012: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0017: pop - IL_0018: ldloc.1 - IL_0019: ldc.i4.1 - IL_001a: add - IL_001b: stloc.1 - IL_001c: ldloc.1 - IL_001d: ldloc.0 - IL_001e: ldc.i4.1 - IL_001f: add - IL_0020: bne.un.s IL_0008 - - IL_0022: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.net472.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.net472.release.bsl deleted file mode 100644 index 1c1f3221262..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.net472.release.bsl +++ /dev/null @@ -1,106 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:0:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop1(int32 N) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2) - IL_0000: ldc.i4.1 - IL_0001: stloc.1 - IL_0002: ldarg.0 - IL_0003: stloc.0 - IL_0004: ldloc.0 - IL_0005: ldloc.1 - IL_0006: blt.s IL_0029 - - IL_0008: ldstr "aaa" - IL_000d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0012: stloc.2 - IL_0013: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_0018: ldloc.2 - IL_0019: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_001e: pop - IL_001f: ldloc.1 - IL_0020: ldc.i4.1 - IL_0021: add - IL_0022: stloc.1 - IL_0023: ldloc.1 - IL_0024: ldloc.0 - IL_0025: ldc.i4.1 - IL_0026: add - IL_0027: bne.un.s IL_0008 - - IL_0029: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.netcore.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.netcore.debug.bsl deleted file mode 100644 index 4c0acb5b6ba..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable01.fsx.il.netcore.debug.bsl +++ /dev/null @@ -1,96 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop1(int32 N) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1) - IL_0000: ldc.i4.1 - IL_0001: stloc.1 - IL_0002: ldarg.0 - IL_0003: stloc.0 - IL_0004: ldloc.0 - IL_0005: ldloc.1 - IL_0006: blt.s IL_0022 - - IL_0008: ldstr "aaa" - IL_000d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0012: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0017: pop - IL_0018: ldloc.1 - IL_0019: ldc.i4.1 - IL_001a: add - IL_001b: stloc.1 - IL_001c: ldloc.1 - IL_001d: ldloc.0 - IL_001e: ldc.i4.1 - IL_001f: add - IL_0020: bne.un.s IL_0008 - - IL_0022: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.net472.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.net472.debug.bsl deleted file mode 100644 index e31d59290d9..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.net472.debug.bsl +++ /dev/null @@ -1,96 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop2(int32 N) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1) - IL_0000: ldc.i4.s 100 - IL_0002: stloc.1 - IL_0003: ldarg.0 - IL_0004: stloc.0 - IL_0005: ldloc.0 - IL_0006: ldloc.1 - IL_0007: blt.s IL_0023 - - IL_0009: ldstr "aaa" - IL_000e: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0013: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0018: pop - IL_0019: ldloc.1 - IL_001a: ldc.i4.1 - IL_001b: add - IL_001c: stloc.1 - IL_001d: ldloc.1 - IL_001e: ldloc.0 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: bne.un.s IL_0009 - - IL_0023: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.net472.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.net472.release.bsl deleted file mode 100644 index 5db215b7499..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.net472.release.bsl +++ /dev/null @@ -1,106 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:0:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop2(int32 N) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2) - IL_0000: ldc.i4.s 100 - IL_0002: stloc.1 - IL_0003: ldarg.0 - IL_0004: stloc.0 - IL_0005: ldloc.0 - IL_0006: ldloc.1 - IL_0007: blt.s IL_002a - - IL_0009: ldstr "aaa" - IL_000e: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0013: stloc.2 - IL_0014: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_0019: ldloc.2 - IL_001a: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_001f: pop - IL_0020: ldloc.1 - IL_0021: ldc.i4.1 - IL_0022: add - IL_0023: stloc.1 - IL_0024: ldloc.1 - IL_0025: ldloc.0 - IL_0026: ldc.i4.1 - IL_0027: add - IL_0028: bne.un.s IL_0009 - - IL_002a: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.netcore.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.netcore.debug.bsl deleted file mode 100644 index e31d59290d9..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable02.fsx.il.netcore.debug.bsl +++ /dev/null @@ -1,96 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop2(int32 N) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1) - IL_0000: ldc.i4.s 100 - IL_0002: stloc.1 - IL_0003: ldarg.0 - IL_0004: stloc.0 - IL_0005: ldloc.0 - IL_0006: ldloc.1 - IL_0007: blt.s IL_0023 - - IL_0009: ldstr "aaa" - IL_000e: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0013: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0018: pop - IL_0019: ldloc.1 - IL_001a: ldc.i4.1 - IL_001b: add - IL_001c: stloc.1 - IL_001d: ldloc.1 - IL_001e: ldloc.0 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: bne.un.s IL_0009 - - IL_0023: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.net472.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.net472.debug.bsl deleted file mode 100644 index c580ba49eec..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.net472.debug.bsl +++ /dev/null @@ -1,98 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop3(int32 a, - int32 N) cil managed - { - .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 ) - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1) - IL_0000: ldarg.0 - IL_0001: stloc.1 - IL_0002: ldarg.1 - IL_0003: stloc.0 - IL_0004: ldloc.0 - IL_0005: ldloc.1 - IL_0006: blt.s IL_0022 - - IL_0008: ldstr "aaa" - IL_000d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0012: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0017: pop - IL_0018: ldloc.1 - IL_0019: ldc.i4.1 - IL_001a: add - IL_001b: stloc.1 - IL_001c: ldloc.1 - IL_001d: ldloc.0 - IL_001e: ldc.i4.1 - IL_001f: add - IL_0020: bne.un.s IL_0008 - - IL_0022: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.net472.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.net472.release.bsl deleted file mode 100644 index 30f24778b50..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.net472.release.bsl +++ /dev/null @@ -1,108 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:0:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop3(int32 a, - int32 N) cil managed - { - .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 ) - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2) - IL_0000: ldarg.0 - IL_0001: stloc.1 - IL_0002: ldarg.1 - IL_0003: stloc.0 - IL_0004: ldloc.0 - IL_0005: ldloc.1 - IL_0006: blt.s IL_0029 - - IL_0008: ldstr "aaa" - IL_000d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0012: stloc.2 - IL_0013: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_0018: ldloc.2 - IL_0019: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_001e: pop - IL_001f: ldloc.1 - IL_0020: ldc.i4.1 - IL_0021: add - IL_0022: stloc.1 - IL_0023: ldloc.1 - IL_0024: ldloc.0 - IL_0025: ldc.i4.1 - IL_0026: add - IL_0027: bne.un.s IL_0008 - - IL_0029: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.netcore.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.netcore.debug.bsl deleted file mode 100644 index c580ba49eec..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/NoIEnumerable03.fsx.il.netcore.debug.bsl +++ /dev/null @@ -1,98 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop3(int32 a, - int32 N) cil managed - { - .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 ) - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1) - IL_0000: ldarg.0 - IL_0001: stloc.1 - IL_0002: ldarg.1 - IL_0003: stloc.0 - IL_0004: ldloc.0 - IL_0005: ldloc.1 - IL_0006: blt.s IL_0022 - - IL_0008: ldstr "aaa" - IL_000d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0012: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0017: pop - IL_0018: ldloc.1 - IL_0019: ldc.i4.1 - IL_001a: add - IL_001b: stloc.1 - IL_001c: ldloc.1 - IL_001d: ldloc.0 - IL_001e: ldc.i4.1 - IL_001f: add - IL_0020: bne.un.s IL_0008 - - IL_0022: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnArray01.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnArray01.fs deleted file mode 100644 index ad9a9e104b5..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnArray01.fs +++ /dev/null @@ -1,8 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow #NoMono #ReqNOMT -// Regression test for FSHARP1.0:3982 -// Compiler should turn 'foreach' loops over arrays into 'for' loops -module ForEachOnArray01 -let test3(arr: int[]) = - let mutable z = 0 - for x in arr do - z <- z + x diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs deleted file mode 100644 index 942d99c3234..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs +++ /dev/null @@ -1,51 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow #NoMono #ReqNOMT -// Compiler should turn 'foreach' loops over lists into 'while' loops -module ForEachOnList01 - -// Some variations to make sure optimizer can detect the foreach properly - -let test1(lst: int list) = - let mutable z = 0 - for x in lst do - z <- z + x - -let test2() = - let mutable z = 0 - for x in [1;2;3] do - z <- z + x - -let test3() = - let xs = [1;2;3] - let mutable z = 0 - for x in xs do - z <- z + x - -let test4() = - let mutable z = 0 - let xs = [1;2;3] - for x in xs do - z <- z + x - -let test5() = - let xs = [1;2;3] - for x in xs do - printfn "%A" x - -// more complex enumerable expression -let test6() = - for i in ( - [1;2;3;4] - |> List.map (fun x -> - x + 1) - ) do - printfn "%O" i - -// multiline body -let test7() = - for i in ( - [1;2;3;4] - |> List.map (fun x -> - x + 1) - ) do - let tmp = i + 1 - printfn "%O" tmp \ No newline at end of file diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.net472.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.net472.debug.bsl deleted file mode 100644 index 9bd0a4ef373..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.net472.debug.bsl +++ /dev/null @@ -1,465 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed assembly - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .class auto ansi serializable sealed nested assembly beforefieldinit test6@38 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test6@38 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance int32 - Invoke(int32 x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: ldc.i4.1 - IL_0002: add - IL_0003: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test6@38::.ctor() - IL_0005: stsfld class assembly/test6@38 assembly/test6@38::@_instance - IL_000a: ret - } - - } - - .class auto ansi serializable sealed nested assembly beforefieldinit test7@47 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test7@47 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance int32 - Invoke(int32 x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: ldc.i4.1 - IL_0002: add - IL_0003: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test7@47::.ctor() - IL_0005: stsfld class assembly/test7@47 assembly/test7@47::@_instance - IL_000a: ret - } - - } - - .method public static void test1(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 lst) cil managed - { - - .maxstack 4 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldarg.0 - IL_0003: stloc.1 - IL_0004: ldloc.1 - IL_0005: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_000a: stloc.2 - IL_000b: br.s IL_0021 - - IL_000d: ldloc.1 - IL_000e: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0013: stloc.3 - IL_0014: ldloc.0 - IL_0015: ldloc.3 - IL_0016: add - IL_0017: stloc.0 - IL_0018: ldloc.2 - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: ldloc.2 - IL_0022: brtrue.s IL_000d - - IL_0024: ret - } - - .method public static void test2() cil managed - { - - .maxstack 6 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.1 - IL_0003: ldc.i4.2 - IL_0004: ldc.i4.3 - IL_0005: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000a: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000f: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0014: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: br.s IL_0037 - - IL_0023: ldloc.1 - IL_0024: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0029: stloc.3 - IL_002a: ldloc.0 - IL_002b: ldloc.3 - IL_002c: add - IL_002d: stloc.0 - IL_002e: ldloc.2 - IL_002f: stloc.1 - IL_0030: ldloc.1 - IL_0031: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0036: stloc.2 - IL_0037: ldloc.2 - IL_0038: brtrue.s IL_0023 - - IL_003a: ret - } - - .method public static void test3() cil managed - { - - .maxstack 6 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - int32 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_3, - int32 V_4) - IL_0000: ldc.i4.1 - IL_0001: ldc.i4.2 - IL_0002: ldc.i4.3 - IL_0003: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_0008: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0012: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0017: stloc.0 - IL_0018: ldc.i4.0 - IL_0019: stloc.1 - IL_001a: ldloc.0 - IL_001b: stloc.2 - IL_001c: ldloc.2 - IL_001d: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0022: stloc.3 - IL_0023: br.s IL_003b - - IL_0025: ldloc.2 - IL_0026: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_002b: stloc.s V_4 - IL_002d: ldloc.1 - IL_002e: ldloc.s V_4 - IL_0030: add - IL_0031: stloc.1 - IL_0032: ldloc.3 - IL_0033: stloc.2 - IL_0034: ldloc.2 - IL_0035: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_003a: stloc.3 - IL_003b: ldloc.3 - IL_003c: brtrue.s IL_0025 - - IL_003e: ret - } - - .method public static void test4() cil managed - { - - .maxstack 6 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_3, - int32 V_4) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.1 - IL_0003: ldc.i4.2 - IL_0004: ldc.i4.3 - IL_0005: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000a: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000f: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0014: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: stloc.2 - IL_001c: ldloc.2 - IL_001d: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0022: stloc.3 - IL_0023: br.s IL_003b - - IL_0025: ldloc.2 - IL_0026: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_002b: stloc.s V_4 - IL_002d: ldloc.0 - IL_002e: ldloc.s V_4 - IL_0030: add - IL_0031: stloc.0 - IL_0032: ldloc.3 - IL_0033: stloc.2 - IL_0034: ldloc.2 - IL_0035: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_003a: stloc.3 - IL_003b: ldloc.3 - IL_003c: brtrue.s IL_0025 - - IL_003e: ret - } - - .method public static void test5() cil managed - { - - .maxstack 6 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.1 - IL_0001: ldc.i4.2 - IL_0002: ldc.i4.3 - IL_0003: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_0008: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0012: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0017: stloc.0 - IL_0018: ldloc.0 - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: br.s IL_0049 - - IL_0023: ldloc.1 - IL_0024: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0029: stloc.3 - IL_002a: ldstr "%A" - IL_002f: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0034: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0039: ldloc.3 - IL_003a: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_003f: pop - IL_0040: ldloc.2 - IL_0041: stloc.1 - IL_0042: ldloc.1 - IL_0043: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0048: stloc.2 - IL_0049: ldloc.2 - IL_004a: brtrue.s IL_0023 - - IL_004c: ret - } - - .method public static void test6() cil managed - { - - .maxstack 8 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - int32 V_2) - IL_0000: ldsfld class assembly/test6@38 assembly/test6@38::@_instance - IL_0005: ldc.i4.1 - IL_0006: ldc.i4.2 - IL_0007: ldc.i4.3 - IL_0008: ldc.i4.4 - IL_0009: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000e: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0013: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0018: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_001d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0022: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0027: stloc.0 - IL_0028: ldloc.0 - IL_0029: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_002e: stloc.1 - IL_002f: br.s IL_0057 - - IL_0031: ldloc.0 - IL_0032: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0037: stloc.2 - IL_0038: ldstr "%O" - IL_003d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0042: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0047: ldloc.2 - IL_0048: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_004d: pop - IL_004e: ldloc.1 - IL_004f: stloc.0 - IL_0050: ldloc.0 - IL_0051: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0056: stloc.1 - IL_0057: ldloc.1 - IL_0058: brtrue.s IL_0031 - - IL_005a: ret - } - - .method public static void test7() cil managed - { - - .maxstack 8 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - int32 V_2, - int32 V_3) - IL_0000: ldsfld class assembly/test7@47 assembly/test7@47::@_instance - IL_0005: ldc.i4.1 - IL_0006: ldc.i4.2 - IL_0007: ldc.i4.3 - IL_0008: ldc.i4.4 - IL_0009: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000e: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0013: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0018: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_001d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0022: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0027: stloc.0 - IL_0028: ldloc.0 - IL_0029: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_002e: stloc.1 - IL_002f: br.s IL_005b - - IL_0031: ldloc.0 - IL_0032: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0037: stloc.2 - IL_0038: ldloc.2 - IL_0039: ldc.i4.1 - IL_003a: add - IL_003b: stloc.3 - IL_003c: ldstr "%O" - IL_0041: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0046: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_004b: ldloc.3 - IL_004c: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0051: pop - IL_0052: ldloc.1 - IL_0053: stloc.0 - IL_0054: ldloc.0 - IL_0055: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_005a: stloc.1 - IL_005b: ldloc.1 - IL_005c: brtrue.s IL_0031 - - IL_005e: ret - } - -} - -.class private abstract auto ansi sealed ''.$assembly - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.net472.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.net472.release.bsl deleted file mode 100644 index 626c68acbf7..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.net472.release.bsl +++ /dev/null @@ -1,485 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:0:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed assembly - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .class auto ansi serializable sealed nested assembly beforefieldinit test6@38 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test6@38 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance int32 - Invoke(int32 x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: ldc.i4.1 - IL_0002: add - IL_0003: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test6@38::.ctor() - IL_0005: stsfld class assembly/test6@38 assembly/test6@38::@_instance - IL_000a: ret - } - - } - - .class auto ansi serializable sealed nested assembly beforefieldinit test7@47 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test7@47 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance int32 - Invoke(int32 x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: ldc.i4.1 - IL_0002: add - IL_0003: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test7@47::.ctor() - IL_0005: stsfld class assembly/test7@47 assembly/test7@47::@_instance - IL_000a: ret - } - - } - - .method public static void test1(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 lst) cil managed - { - - .maxstack 4 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldarg.0 - IL_0003: stloc.1 - IL_0004: ldloc.1 - IL_0005: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_000a: stloc.2 - IL_000b: br.s IL_0021 - - IL_000d: ldloc.1 - IL_000e: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0013: stloc.3 - IL_0014: ldloc.0 - IL_0015: ldloc.3 - IL_0016: add - IL_0017: stloc.0 - IL_0018: ldloc.2 - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: ldloc.2 - IL_0022: brtrue.s IL_000d - - IL_0024: ret - } - - .method public static void test2() cil managed - { - - .maxstack 6 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.1 - IL_0003: ldc.i4.2 - IL_0004: ldc.i4.3 - IL_0005: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000a: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000f: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0014: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: br.s IL_0037 - - IL_0023: ldloc.1 - IL_0024: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0029: stloc.3 - IL_002a: ldloc.0 - IL_002b: ldloc.3 - IL_002c: add - IL_002d: stloc.0 - IL_002e: ldloc.2 - IL_002f: stloc.1 - IL_0030: ldloc.1 - IL_0031: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0036: stloc.2 - IL_0037: ldloc.2 - IL_0038: brtrue.s IL_0023 - - IL_003a: ret - } - - .method public static void test3() cil managed - { - - .maxstack 6 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - int32 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_3, - int32 V_4) - IL_0000: ldc.i4.1 - IL_0001: ldc.i4.2 - IL_0002: ldc.i4.3 - IL_0003: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_0008: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0012: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0017: stloc.0 - IL_0018: ldc.i4.0 - IL_0019: stloc.1 - IL_001a: ldloc.0 - IL_001b: stloc.2 - IL_001c: ldloc.2 - IL_001d: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0022: stloc.3 - IL_0023: br.s IL_003b - - IL_0025: ldloc.2 - IL_0026: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_002b: stloc.s V_4 - IL_002d: ldloc.1 - IL_002e: ldloc.s V_4 - IL_0030: add - IL_0031: stloc.1 - IL_0032: ldloc.3 - IL_0033: stloc.2 - IL_0034: ldloc.2 - IL_0035: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_003a: stloc.3 - IL_003b: ldloc.3 - IL_003c: brtrue.s IL_0025 - - IL_003e: ret - } - - .method public static void test4() cil managed - { - - .maxstack 6 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_3, - int32 V_4) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.1 - IL_0003: ldc.i4.2 - IL_0004: ldc.i4.3 - IL_0005: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000a: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000f: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0014: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: stloc.2 - IL_001c: ldloc.2 - IL_001d: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0022: stloc.3 - IL_0023: br.s IL_003b - - IL_0025: ldloc.2 - IL_0026: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_002b: stloc.s V_4 - IL_002d: ldloc.0 - IL_002e: ldloc.s V_4 - IL_0030: add - IL_0031: stloc.0 - IL_0032: ldloc.3 - IL_0033: stloc.2 - IL_0034: ldloc.2 - IL_0035: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_003a: stloc.3 - IL_003b: ldloc.3 - IL_003c: brtrue.s IL_0025 - - IL_003e: ret - } - - .method public static void test5() cil managed - { - - .maxstack 6 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_4) - IL_0000: ldc.i4.1 - IL_0001: ldc.i4.2 - IL_0002: ldc.i4.3 - IL_0003: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_0008: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0012: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0017: stloc.0 - IL_0018: ldloc.0 - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: br.s IL_0052 - - IL_0023: ldloc.1 - IL_0024: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0029: stloc.3 - IL_002a: ldstr "%A" - IL_002f: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0034: stloc.s V_4 - IL_0036: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_003b: ldloc.s V_4 - IL_003d: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter>(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0042: ldloc.3 - IL_0043: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0048: pop - IL_0049: ldloc.2 - IL_004a: stloc.1 - IL_004b: ldloc.1 - IL_004c: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0051: stloc.2 - IL_0052: ldloc.2 - IL_0053: brtrue.s IL_0023 - - IL_0055: ret - } - - .method public static void test6() cil managed - { - - .maxstack 8 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - int32 V_2, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_3) - IL_0000: ldsfld class assembly/test6@38 assembly/test6@38::@_instance - IL_0005: ldc.i4.1 - IL_0006: ldc.i4.2 - IL_0007: ldc.i4.3 - IL_0008: ldc.i4.4 - IL_0009: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000e: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0013: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0018: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_001d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0022: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0027: stloc.0 - IL_0028: ldloc.0 - IL_0029: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_002e: stloc.1 - IL_002f: br.s IL_005e - - IL_0031: ldloc.0 - IL_0032: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0037: stloc.2 - IL_0038: ldstr "%O" - IL_003d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0042: stloc.3 - IL_0043: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_0048: ldloc.3 - IL_0049: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter>(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_004e: ldloc.2 - IL_004f: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0054: pop - IL_0055: ldloc.1 - IL_0056: stloc.0 - IL_0057: ldloc.0 - IL_0058: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_005d: stloc.1 - IL_005e: ldloc.1 - IL_005f: brtrue.s IL_0031 - - IL_0061: ret - } - - .method public static void test7() cil managed - { - - .maxstack 8 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - int32 V_2, - int32 V_3, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_4) - IL_0000: ldsfld class assembly/test7@47 assembly/test7@47::@_instance - IL_0005: ldc.i4.1 - IL_0006: ldc.i4.2 - IL_0007: ldc.i4.3 - IL_0008: ldc.i4.4 - IL_0009: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000e: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0013: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0018: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_001d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0022: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0027: stloc.0 - IL_0028: ldloc.0 - IL_0029: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_002e: stloc.1 - IL_002f: br.s IL_0064 - - IL_0031: ldloc.0 - IL_0032: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0037: stloc.2 - IL_0038: ldloc.2 - IL_0039: ldc.i4.1 - IL_003a: add - IL_003b: stloc.3 - IL_003c: ldstr "%O" - IL_0041: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0046: stloc.s V_4 - IL_0048: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_004d: ldloc.s V_4 - IL_004f: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter>(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0054: ldloc.3 - IL_0055: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_005a: pop - IL_005b: ldloc.1 - IL_005c: stloc.0 - IL_005d: ldloc.0 - IL_005e: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0063: stloc.1 - IL_0064: ldloc.1 - IL_0065: brtrue.s IL_0031 - - IL_0067: ret - } - -} - -.class private abstract auto ansi sealed ''.$assembly - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.netcore.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.netcore.debug.bsl deleted file mode 100644 index 9bd0a4ef373..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnList01.fs.il.netcore.debug.bsl +++ /dev/null @@ -1,465 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed assembly - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .class auto ansi serializable sealed nested assembly beforefieldinit test6@38 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test6@38 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance int32 - Invoke(int32 x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: ldc.i4.1 - IL_0002: add - IL_0003: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test6@38::.ctor() - IL_0005: stsfld class assembly/test6@38 assembly/test6@38::@_instance - IL_000a: ret - } - - } - - .class auto ansi serializable sealed nested assembly beforefieldinit test7@47 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test7@47 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance int32 - Invoke(int32 x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: ldc.i4.1 - IL_0002: add - IL_0003: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test7@47::.ctor() - IL_0005: stsfld class assembly/test7@47 assembly/test7@47::@_instance - IL_000a: ret - } - - } - - .method public static void test1(class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 lst) cil managed - { - - .maxstack 4 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldarg.0 - IL_0003: stloc.1 - IL_0004: ldloc.1 - IL_0005: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_000a: stloc.2 - IL_000b: br.s IL_0021 - - IL_000d: ldloc.1 - IL_000e: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0013: stloc.3 - IL_0014: ldloc.0 - IL_0015: ldloc.3 - IL_0016: add - IL_0017: stloc.0 - IL_0018: ldloc.2 - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: ldloc.2 - IL_0022: brtrue.s IL_000d - - IL_0024: ret - } - - .method public static void test2() cil managed - { - - .maxstack 6 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.1 - IL_0003: ldc.i4.2 - IL_0004: ldc.i4.3 - IL_0005: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000a: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000f: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0014: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: br.s IL_0037 - - IL_0023: ldloc.1 - IL_0024: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0029: stloc.3 - IL_002a: ldloc.0 - IL_002b: ldloc.3 - IL_002c: add - IL_002d: stloc.0 - IL_002e: ldloc.2 - IL_002f: stloc.1 - IL_0030: ldloc.1 - IL_0031: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0036: stloc.2 - IL_0037: ldloc.2 - IL_0038: brtrue.s IL_0023 - - IL_003a: ret - } - - .method public static void test3() cil managed - { - - .maxstack 6 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - int32 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_3, - int32 V_4) - IL_0000: ldc.i4.1 - IL_0001: ldc.i4.2 - IL_0002: ldc.i4.3 - IL_0003: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_0008: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0012: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0017: stloc.0 - IL_0018: ldc.i4.0 - IL_0019: stloc.1 - IL_001a: ldloc.0 - IL_001b: stloc.2 - IL_001c: ldloc.2 - IL_001d: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0022: stloc.3 - IL_0023: br.s IL_003b - - IL_0025: ldloc.2 - IL_0026: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_002b: stloc.s V_4 - IL_002d: ldloc.1 - IL_002e: ldloc.s V_4 - IL_0030: add - IL_0031: stloc.1 - IL_0032: ldloc.3 - IL_0033: stloc.2 - IL_0034: ldloc.2 - IL_0035: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_003a: stloc.3 - IL_003b: ldloc.3 - IL_003c: brtrue.s IL_0025 - - IL_003e: ret - } - - .method public static void test4() cil managed - { - - .maxstack 6 - .locals init (int32 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_3, - int32 V_4) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.1 - IL_0003: ldc.i4.2 - IL_0004: ldc.i4.3 - IL_0005: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000a: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000f: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0014: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: stloc.2 - IL_001c: ldloc.2 - IL_001d: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0022: stloc.3 - IL_0023: br.s IL_003b - - IL_0025: ldloc.2 - IL_0026: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_002b: stloc.s V_4 - IL_002d: ldloc.0 - IL_002e: ldloc.s V_4 - IL_0030: add - IL_0031: stloc.0 - IL_0032: ldloc.3 - IL_0033: stloc.2 - IL_0034: ldloc.2 - IL_0035: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_003a: stloc.3 - IL_003b: ldloc.3 - IL_003c: brtrue.s IL_0025 - - IL_003e: ret - } - - .method public static void test5() cil managed - { - - .maxstack 6 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_2, - int32 V_3) - IL_0000: ldc.i4.1 - IL_0001: ldc.i4.2 - IL_0002: ldc.i4.3 - IL_0003: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_0008: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_000d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0012: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0017: stloc.0 - IL_0018: ldloc.0 - IL_0019: stloc.1 - IL_001a: ldloc.1 - IL_001b: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0020: stloc.2 - IL_0021: br.s IL_0049 - - IL_0023: ldloc.1 - IL_0024: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0029: stloc.3 - IL_002a: ldstr "%A" - IL_002f: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0034: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0039: ldloc.3 - IL_003a: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_003f: pop - IL_0040: ldloc.2 - IL_0041: stloc.1 - IL_0042: ldloc.1 - IL_0043: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0048: stloc.2 - IL_0049: ldloc.2 - IL_004a: brtrue.s IL_0023 - - IL_004c: ret - } - - .method public static void test6() cil managed - { - - .maxstack 8 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - int32 V_2) - IL_0000: ldsfld class assembly/test6@38 assembly/test6@38::@_instance - IL_0005: ldc.i4.1 - IL_0006: ldc.i4.2 - IL_0007: ldc.i4.3 - IL_0008: ldc.i4.4 - IL_0009: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000e: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0013: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0018: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_001d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0022: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0027: stloc.0 - IL_0028: ldloc.0 - IL_0029: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_002e: stloc.1 - IL_002f: br.s IL_0057 - - IL_0031: ldloc.0 - IL_0032: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0037: stloc.2 - IL_0038: ldstr "%O" - IL_003d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0042: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0047: ldloc.2 - IL_0048: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_004d: pop - IL_004e: ldloc.1 - IL_004f: stloc.0 - IL_0050: ldloc.0 - IL_0051: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_0056: stloc.1 - IL_0057: ldloc.1 - IL_0058: brtrue.s IL_0031 - - IL_005a: ret - } - - .method public static void test7() cil managed - { - - .maxstack 8 - .locals init (class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 V_1, - int32 V_2, - int32 V_3) - IL_0000: ldsfld class assembly/test7@47 assembly/test7@47::@_instance - IL_0005: ldc.i4.1 - IL_0006: ldc.i4.2 - IL_0007: ldc.i4.3 - IL_0008: ldc.i4.4 - IL_0009: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_Empty() - IL_000e: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0013: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0018: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_001d: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::Cons(!0, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0022: call class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 [FSharp.Core]Microsoft.FSharp.Collections.ListModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1) - IL_0027: stloc.0 - IL_0028: ldloc.0 - IL_0029: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_002e: stloc.1 - IL_002f: br.s IL_005b - - IL_0031: ldloc.0 - IL_0032: call instance !0 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_HeadOrDefault() - IL_0037: stloc.2 - IL_0038: ldloc.2 - IL_0039: ldc.i4.1 - IL_003a: add - IL_003b: stloc.3 - IL_003c: ldstr "%O" - IL_0041: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,int32>::.ctor(string) - IL_0046: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_004b: ldloc.3 - IL_004c: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0051: pop - IL_0052: ldloc.1 - IL_0053: stloc.0 - IL_0054: ldloc.0 - IL_0055: call instance class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1 class [FSharp.Core]Microsoft.FSharp.Collections.FSharpList`1::get_TailOrNull() - IL_005a: stloc.1 - IL_005b: ldloc.1 - IL_005c: brtrue.s IL_0031 - - IL_005e: ret - } - -} - -.class private abstract auto ansi sealed ''.$assembly - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs deleted file mode 100644 index 04262a04e63..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs +++ /dev/null @@ -1,67 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow #NoMono #ReqNOMT -// Compiler should turn 'foreach' loops over strings into 'for' loops -module ForEachOnString01 - -open System - -let test1(str: string) = - let mutable z = 0 - for x in str do - z <- z + (int x) - -let test2() = - let mutable z = 0 - for x in "123" do - z <- z + (int x) - -let test3() = - let xs = "123" - let mutable z = 0 - for x in xs do - z <- z + (int x) - -let test4() = - let mutable z = 0 - let xs = "123" - for x in xs do - z <- z + (int x) - -let test5() = - let xs = "123" - for x in xs do - printfn "%A" x - -// test6, test7 makes sure the optimization triggers -// for System.String and String as well. -// They are the same type as string but internally string -// is an alias which potentially could make the optimizer -// miss one case or the other -let test6(str: System.String) = - let mutable z = 0 - for x in str do - z <- z + (int x) - -let test7() = - let xs : String = "123" - let mutable z = 0 - for x in xs do - z <- z + (int x) - -// more complex enumerable expression -let test8() = - for i in ( - "1234" - |> String.map (fun x -> - char ((int x) + 1)) - ) do - printfn "%O" i - -// multiline body -let test9() = - for i in ( - "1234" - |> String.map (fun x -> - char ((int x) + 1)) - ) do - let tmp = System.String.Format("{0} foo", i) - printfn "%O" tmp diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.net472.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.net472.debug.bsl deleted file mode 100644 index e0dc7ca6f63..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.net472.debug.bsl +++ /dev/null @@ -1,556 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:0:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed assembly - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .class auto ansi serializable sealed nested assembly beforefieldinit test8@54 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test8@54 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance char - Invoke(char x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: conv.i4 - IL_0002: ldc.i4.1 - IL_0003: add - IL_0004: conv.u2 - IL_0005: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test8@54::.ctor() - IL_0005: stsfld class assembly/test8@54 assembly/test8@54::@_instance - IL_000a: ret - } - - } - - .class auto ansi serializable sealed nested assembly beforefieldinit test9@63 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test9@63 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance char - Invoke(char x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: conv.i4 - IL_0002: ldc.i4.1 - IL_0003: add - IL_0004: conv.u2 - IL_0005: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test9@63::.ctor() - IL_0005: stsfld class assembly/test9@63 assembly/test9@63::@_instance - IL_000a: ret - } - - } - - .method public static void test1(string str) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldarg.0 - IL_0005: callvirt instance int32 [runtime]System.String::get_Length() - IL_000a: ldc.i4.1 - IL_000b: sub - IL_000c: stloc.1 - IL_000d: ldloc.1 - IL_000e: ldloc.2 - IL_000f: blt.s IL_0028 - - IL_0011: ldarg.0 - IL_0012: ldloc.2 - IL_0013: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0018: stloc.3 - IL_0019: ldloc.0 - IL_001a: ldloc.3 - IL_001b: conv.i4 - IL_001c: add - IL_001d: stloc.0 - IL_001e: ldloc.2 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: stloc.2 - IL_0022: ldloc.2 - IL_0023: ldloc.1 - IL_0024: ldc.i4.1 - IL_0025: add - IL_0026: bne.un.s IL_0011 - - IL_0028: ret - } - - .method public static void test2() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldstr "123" - IL_0009: callvirt instance int32 [runtime]System.String::get_Length() - IL_000e: ldc.i4.1 - IL_000f: sub - IL_0010: stloc.1 - IL_0011: ldloc.1 - IL_0012: ldloc.2 - IL_0013: blt.s IL_0030 - - IL_0015: ldstr "123" - IL_001a: ldloc.2 - IL_001b: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0020: stloc.3 - IL_0021: ldloc.0 - IL_0022: ldloc.3 - IL_0023: conv.i4 - IL_0024: add - IL_0025: stloc.0 - IL_0026: ldloc.2 - IL_0027: ldc.i4.1 - IL_0028: add - IL_0029: stloc.2 - IL_002a: ldloc.2 - IL_002b: ldloc.1 - IL_002c: ldc.i4.1 - IL_002d: add - IL_002e: bne.un.s IL_0015 - - IL_0030: ret - } - - .method public static void test3() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.0 - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test4() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: nop - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test5() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - char V_2) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.1 - IL_0003: ldstr "123" - IL_0008: callvirt instance int32 [runtime]System.String::get_Length() - IL_000d: ldc.i4.1 - IL_000e: sub - IL_000f: stloc.0 - IL_0010: ldloc.0 - IL_0011: ldloc.1 - IL_0012: blt.s IL_0040 - - IL_0014: ldstr "123" - IL_0019: ldloc.1 - IL_001a: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_001f: stloc.2 - IL_0020: ldstr "%A" - IL_0025: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,char>::.ctor(string) - IL_002a: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_002f: ldloc.2 - IL_0030: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0035: pop - IL_0036: ldloc.1 - IL_0037: ldc.i4.1 - IL_0038: add - IL_0039: stloc.1 - IL_003a: ldloc.1 - IL_003b: ldloc.0 - IL_003c: ldc.i4.1 - IL_003d: add - IL_003e: bne.un.s IL_0014 - - IL_0040: ret - } - - .method public static void test6(string str) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldarg.0 - IL_0005: callvirt instance int32 [runtime]System.String::get_Length() - IL_000a: ldc.i4.1 - IL_000b: sub - IL_000c: stloc.1 - IL_000d: ldloc.1 - IL_000e: ldloc.2 - IL_000f: blt.s IL_0028 - - IL_0011: ldarg.0 - IL_0012: ldloc.2 - IL_0013: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0018: stloc.3 - IL_0019: ldloc.0 - IL_001a: ldloc.3 - IL_001b: conv.i4 - IL_001c: add - IL_001d: stloc.0 - IL_001e: ldloc.2 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: stloc.2 - IL_0022: ldloc.2 - IL_0023: ldloc.1 - IL_0024: ldc.i4.1 - IL_0025: add - IL_0026: bne.un.s IL_0011 - - IL_0028: ret - } - - .method public static void test7() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.0 - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test8() cil managed - { - - .maxstack 5 - .locals init (string V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldsfld class assembly/test8@54 assembly/test8@54::@_instance - IL_0005: ldstr "1234" - IL_000a: call string [FSharp.Core]Microsoft.FSharp.Core.StringModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - string) - IL_000f: stloc.0 - IL_0010: ldc.i4.0 - IL_0011: stloc.2 - IL_0012: ldloc.0 - IL_0013: callvirt instance int32 [runtime]System.String::get_Length() - IL_0018: ldc.i4.1 - IL_0019: sub - IL_001a: stloc.1 - IL_001b: ldloc.1 - IL_001c: ldloc.2 - IL_001d: blt.s IL_0047 - - IL_001f: ldloc.0 - IL_0020: ldloc.2 - IL_0021: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0026: stloc.3 - IL_0027: ldstr "%O" - IL_002c: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,char>::.ctor(string) - IL_0031: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0036: ldloc.3 - IL_0037: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_003c: pop - IL_003d: ldloc.2 - IL_003e: ldc.i4.1 - IL_003f: add - IL_0040: stloc.2 - IL_0041: ldloc.2 - IL_0042: ldloc.1 - IL_0043: ldc.i4.1 - IL_0044: add - IL_0045: bne.un.s IL_001f - - IL_0047: ret - } - - .method public static void test9() cil managed - { - - .maxstack 5 - .locals init (string V_0, - int32 V_1, - int32 V_2, - char V_3, - string V_4) - IL_0000: ldsfld class assembly/test9@63 assembly/test9@63::@_instance - IL_0005: ldstr "1234" - IL_000a: call string [FSharp.Core]Microsoft.FSharp.Core.StringModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - string) - IL_000f: stloc.0 - IL_0010: ldc.i4.0 - IL_0011: stloc.2 - IL_0012: ldloc.0 - IL_0013: callvirt instance int32 [runtime]System.String::get_Length() - IL_0018: ldc.i4.1 - IL_0019: sub - IL_001a: stloc.1 - IL_001b: ldloc.1 - IL_001c: ldloc.2 - IL_001d: blt.s IL_005a - - IL_001f: ldloc.0 - IL_0020: ldloc.2 - IL_0021: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0026: stloc.3 - IL_0027: ldstr "{0} foo" - IL_002c: ldloc.3 - IL_002d: box [runtime]System.Char - IL_0032: call string [runtime]System.String::Format(string, - object) - IL_0037: stloc.s V_4 - IL_0039: ldstr "%O" - IL_003e: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string>::.ctor(string) - IL_0043: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0048: ldloc.s V_4 - IL_004a: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_004f: pop - IL_0050: ldloc.2 - IL_0051: ldc.i4.1 - IL_0052: add - IL_0053: stloc.2 - IL_0054: ldloc.2 - IL_0055: ldloc.1 - IL_0056: ldc.i4.1 - IL_0057: add - IL_0058: bne.un.s IL_001f - - IL_005a: ret - } - -} - -.class private abstract auto ansi sealed ''.$assembly - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.net472.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.net472.release.bsl deleted file mode 100644 index 438815ac15a..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.net472.release.bsl +++ /dev/null @@ -1,571 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:0:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed assembly - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .class auto ansi serializable sealed nested assembly beforefieldinit test8@54 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test8@54 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance char - Invoke(char x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: conv.i4 - IL_0002: ldc.i4.1 - IL_0003: add - IL_0004: conv.u2 - IL_0005: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test8@54::.ctor() - IL_0005: stsfld class assembly/test8@54 assembly/test8@54::@_instance - IL_000a: ret - } - - } - - .class auto ansi serializable sealed nested assembly beforefieldinit test9@63 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test9@63 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance char - Invoke(char x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: conv.i4 - IL_0002: ldc.i4.1 - IL_0003: add - IL_0004: conv.u2 - IL_0005: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test9@63::.ctor() - IL_0005: stsfld class assembly/test9@63 assembly/test9@63::@_instance - IL_000a: ret - } - - } - - .method public static void test1(string str) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldarg.0 - IL_0005: callvirt instance int32 [runtime]System.String::get_Length() - IL_000a: ldc.i4.1 - IL_000b: sub - IL_000c: stloc.1 - IL_000d: ldloc.1 - IL_000e: ldloc.2 - IL_000f: blt.s IL_0028 - - IL_0011: ldarg.0 - IL_0012: ldloc.2 - IL_0013: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0018: stloc.3 - IL_0019: ldloc.0 - IL_001a: ldloc.3 - IL_001b: conv.i4 - IL_001c: add - IL_001d: stloc.0 - IL_001e: ldloc.2 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: stloc.2 - IL_0022: ldloc.2 - IL_0023: ldloc.1 - IL_0024: ldc.i4.1 - IL_0025: add - IL_0026: bne.un.s IL_0011 - - IL_0028: ret - } - - .method public static void test2() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldstr "123" - IL_0009: callvirt instance int32 [runtime]System.String::get_Length() - IL_000e: ldc.i4.1 - IL_000f: sub - IL_0010: stloc.1 - IL_0011: ldloc.1 - IL_0012: ldloc.2 - IL_0013: blt.s IL_0030 - - IL_0015: ldstr "123" - IL_001a: ldloc.2 - IL_001b: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0020: stloc.3 - IL_0021: ldloc.0 - IL_0022: ldloc.3 - IL_0023: conv.i4 - IL_0024: add - IL_0025: stloc.0 - IL_0026: ldloc.2 - IL_0027: ldc.i4.1 - IL_0028: add - IL_0029: stloc.2 - IL_002a: ldloc.2 - IL_002b: ldloc.1 - IL_002c: ldc.i4.1 - IL_002d: add - IL_002e: bne.un.s IL_0015 - - IL_0030: ret - } - - .method public static void test3() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.0 - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test4() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: nop - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test5() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - char V_2, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.1 - IL_0003: ldstr "123" - IL_0008: callvirt instance int32 [runtime]System.String::get_Length() - IL_000d: ldc.i4.1 - IL_000e: sub - IL_000f: stloc.0 - IL_0010: ldloc.0 - IL_0011: ldloc.1 - IL_0012: blt.s IL_0047 - - IL_0014: ldstr "123" - IL_0019: ldloc.1 - IL_001a: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_001f: stloc.2 - IL_0020: ldstr "%A" - IL_0025: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,char>::.ctor(string) - IL_002a: stloc.3 - IL_002b: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_0030: ldloc.3 - IL_0031: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter>(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0036: ldloc.2 - IL_0037: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_003c: pop - IL_003d: ldloc.1 - IL_003e: ldc.i4.1 - IL_003f: add - IL_0040: stloc.1 - IL_0041: ldloc.1 - IL_0042: ldloc.0 - IL_0043: ldc.i4.1 - IL_0044: add - IL_0045: bne.un.s IL_0014 - - IL_0047: ret - } - - .method public static void test6(string str) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldarg.0 - IL_0005: callvirt instance int32 [runtime]System.String::get_Length() - IL_000a: ldc.i4.1 - IL_000b: sub - IL_000c: stloc.1 - IL_000d: ldloc.1 - IL_000e: ldloc.2 - IL_000f: blt.s IL_0028 - - IL_0011: ldarg.0 - IL_0012: ldloc.2 - IL_0013: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0018: stloc.3 - IL_0019: ldloc.0 - IL_001a: ldloc.3 - IL_001b: conv.i4 - IL_001c: add - IL_001d: stloc.0 - IL_001e: ldloc.2 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: stloc.2 - IL_0022: ldloc.2 - IL_0023: ldloc.1 - IL_0024: ldc.i4.1 - IL_0025: add - IL_0026: bne.un.s IL_0011 - - IL_0028: ret - } - - .method public static void test7() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.0 - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test8() cil managed - { - - .maxstack 5 - .locals init (string V_0, - int32 V_1, - int32 V_2, - char V_3, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_4) - IL_0000: ldsfld class assembly/test8@54 assembly/test8@54::@_instance - IL_0005: ldstr "1234" - IL_000a: call string [FSharp.Core]Microsoft.FSharp.Core.StringModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - string) - IL_000f: stloc.0 - IL_0010: ldc.i4.0 - IL_0011: stloc.2 - IL_0012: ldloc.0 - IL_0013: callvirt instance int32 [runtime]System.String::get_Length() - IL_0018: ldc.i4.1 - IL_0019: sub - IL_001a: stloc.1 - IL_001b: ldloc.1 - IL_001c: ldloc.2 - IL_001d: blt.s IL_0050 - - IL_001f: ldloc.0 - IL_0020: ldloc.2 - IL_0021: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0026: stloc.3 - IL_0027: ldstr "%O" - IL_002c: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,char>::.ctor(string) - IL_0031: stloc.s V_4 - IL_0033: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_0038: ldloc.s V_4 - IL_003a: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter>(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_003f: ldloc.3 - IL_0040: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0045: pop - IL_0046: ldloc.2 - IL_0047: ldc.i4.1 - IL_0048: add - IL_0049: stloc.2 - IL_004a: ldloc.2 - IL_004b: ldloc.1 - IL_004c: ldc.i4.1 - IL_004d: add - IL_004e: bne.un.s IL_001f - - IL_0050: ret - } - - .method public static void test9() cil managed - { - - .maxstack 5 - .locals init (string V_0, - int32 V_1, - int32 V_2, - char V_3, - string V_4, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit> V_5) - IL_0000: ldsfld class assembly/test9@63 assembly/test9@63::@_instance - IL_0005: ldstr "1234" - IL_000a: call string [FSharp.Core]Microsoft.FSharp.Core.StringModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - string) - IL_000f: stloc.0 - IL_0010: ldc.i4.0 - IL_0011: stloc.2 - IL_0012: ldloc.0 - IL_0013: callvirt instance int32 [runtime]System.String::get_Length() - IL_0018: ldc.i4.1 - IL_0019: sub - IL_001a: stloc.1 - IL_001b: ldloc.1 - IL_001c: ldloc.2 - IL_001d: blt.s IL_0063 - - IL_001f: ldloc.0 - IL_0020: ldloc.2 - IL_0021: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0026: stloc.3 - IL_0027: ldstr "{0} foo" - IL_002c: ldloc.3 - IL_002d: box [runtime]System.Char - IL_0032: call string [runtime]System.String::Format(string, - object) - IL_0037: stloc.s V_4 - IL_0039: ldstr "%O" - IL_003e: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string>::.ctor(string) - IL_0043: stloc.s V_5 - IL_0045: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_004a: ldloc.s V_5 - IL_004c: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter>(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0051: ldloc.s V_4 - IL_0053: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0058: pop - IL_0059: ldloc.2 - IL_005a: ldc.i4.1 - IL_005b: add - IL_005c: stloc.2 - IL_005d: ldloc.2 - IL_005e: ldloc.1 - IL_005f: ldc.i4.1 - IL_0060: add - IL_0061: bne.un.s IL_001f - - IL_0063: ret - } - -} - -.class private abstract auto ansi sealed ''.$assembly - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.netcore.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.netcore.debug.bsl deleted file mode 100644 index c56fef87382..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachOnString01.fs.il.netcore.debug.bsl +++ /dev/null @@ -1,556 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:1:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed assembly - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .class auto ansi serializable sealed nested assembly beforefieldinit test8@54 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test8@54 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance char - Invoke(char x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: conv.i4 - IL_0002: ldc.i4.1 - IL_0003: add - IL_0004: conv.u2 - IL_0005: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test8@54::.ctor() - IL_0005: stsfld class assembly/test8@54 assembly/test8@54::@_instance - IL_000a: ret - } - - } - - .class auto ansi serializable sealed nested assembly beforefieldinit test9@63 - extends class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2 - { - .field static assembly initonly class assembly/test9@63 @_instance - .method assembly specialname rtspecialname - instance void .ctor() cil managed - { - .custom instance void [runtime]System.Runtime.CompilerServices.CompilerGeneratedAttribute::.ctor() = ( 01 00 00 00 ) - .custom instance void [runtime]System.Diagnostics.DebuggerNonUserCodeAttribute::.ctor() = ( 01 00 00 00 ) - - .maxstack 8 - IL_0000: ldarg.0 - IL_0001: call instance void class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::.ctor() - IL_0006: ret - } - - .method public strict virtual instance char - Invoke(char x) cil managed - { - - .maxstack 8 - IL_0000: ldarg.1 - IL_0001: conv.i4 - IL_0002: ldc.i4.1 - IL_0003: add - IL_0004: conv.u2 - IL_0005: ret - } - - .method private specialname rtspecialname static - void .cctor() cil managed - { - - .maxstack 10 - IL_0000: newobj instance void assembly/test9@63::.ctor() - IL_0005: stsfld class assembly/test9@63 assembly/test9@63::@_instance - IL_000a: ret - } - - } - - .method public static void test1(string str) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldarg.0 - IL_0005: callvirt instance int32 [runtime]System.String::get_Length() - IL_000a: ldc.i4.1 - IL_000b: sub - IL_000c: stloc.1 - IL_000d: ldloc.1 - IL_000e: ldloc.2 - IL_000f: blt.s IL_0028 - - IL_0011: ldarg.0 - IL_0012: ldloc.2 - IL_0013: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0018: stloc.3 - IL_0019: ldloc.0 - IL_001a: ldloc.3 - IL_001b: conv.i4 - IL_001c: add - IL_001d: stloc.0 - IL_001e: ldloc.2 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: stloc.2 - IL_0022: ldloc.2 - IL_0023: ldloc.1 - IL_0024: ldc.i4.1 - IL_0025: add - IL_0026: bne.un.s IL_0011 - - IL_0028: ret - } - - .method public static void test2() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldstr "123" - IL_0009: callvirt instance int32 [runtime]System.String::get_Length() - IL_000e: ldc.i4.1 - IL_000f: sub - IL_0010: stloc.1 - IL_0011: ldloc.1 - IL_0012: ldloc.2 - IL_0013: blt.s IL_0030 - - IL_0015: ldstr "123" - IL_001a: ldloc.2 - IL_001b: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0020: stloc.3 - IL_0021: ldloc.0 - IL_0022: ldloc.3 - IL_0023: conv.i4 - IL_0024: add - IL_0025: stloc.0 - IL_0026: ldloc.2 - IL_0027: ldc.i4.1 - IL_0028: add - IL_0029: stloc.2 - IL_002a: ldloc.2 - IL_002b: ldloc.1 - IL_002c: ldc.i4.1 - IL_002d: add - IL_002e: bne.un.s IL_0015 - - IL_0030: ret - } - - .method public static void test3() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.0 - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test4() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: nop - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test5() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - char V_2) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.1 - IL_0003: ldstr "123" - IL_0008: callvirt instance int32 [runtime]System.String::get_Length() - IL_000d: ldc.i4.1 - IL_000e: sub - IL_000f: stloc.0 - IL_0010: ldloc.0 - IL_0011: ldloc.1 - IL_0012: blt.s IL_0040 - - IL_0014: ldstr "123" - IL_0019: ldloc.1 - IL_001a: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_001f: stloc.2 - IL_0020: ldstr "%A" - IL_0025: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,char>::.ctor(string) - IL_002a: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_002f: ldloc.2 - IL_0030: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_0035: pop - IL_0036: ldloc.1 - IL_0037: ldc.i4.1 - IL_0038: add - IL_0039: stloc.1 - IL_003a: ldloc.1 - IL_003b: ldloc.0 - IL_003c: ldc.i4.1 - IL_003d: add - IL_003e: bne.un.s IL_0014 - - IL_0040: ret - } - - .method public static void test6(string str) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldc.i4.0 - IL_0001: stloc.0 - IL_0002: ldc.i4.0 - IL_0003: stloc.2 - IL_0004: ldarg.0 - IL_0005: callvirt instance int32 [runtime]System.String::get_Length() - IL_000a: ldc.i4.1 - IL_000b: sub - IL_000c: stloc.1 - IL_000d: ldloc.1 - IL_000e: ldloc.2 - IL_000f: blt.s IL_0028 - - IL_0011: ldarg.0 - IL_0012: ldloc.2 - IL_0013: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0018: stloc.3 - IL_0019: ldloc.0 - IL_001a: ldloc.3 - IL_001b: conv.i4 - IL_001c: add - IL_001d: stloc.0 - IL_001e: ldloc.2 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: stloc.2 - IL_0022: ldloc.2 - IL_0023: ldloc.1 - IL_0024: ldc.i4.1 - IL_0025: add - IL_0026: bne.un.s IL_0011 - - IL_0028: ret - } - - .method public static void test7() cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: nop - IL_0001: ldc.i4.0 - IL_0002: stloc.0 - IL_0003: ldc.i4.0 - IL_0004: stloc.2 - IL_0005: ldstr "123" - IL_000a: callvirt instance int32 [runtime]System.String::get_Length() - IL_000f: ldc.i4.1 - IL_0010: sub - IL_0011: stloc.1 - IL_0012: ldloc.1 - IL_0013: ldloc.2 - IL_0014: blt.s IL_0031 - - IL_0016: ldstr "123" - IL_001b: ldloc.2 - IL_001c: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0021: stloc.3 - IL_0022: ldloc.0 - IL_0023: ldloc.3 - IL_0024: conv.i4 - IL_0025: add - IL_0026: stloc.0 - IL_0027: ldloc.2 - IL_0028: ldc.i4.1 - IL_0029: add - IL_002a: stloc.2 - IL_002b: ldloc.2 - IL_002c: ldloc.1 - IL_002d: ldc.i4.1 - IL_002e: add - IL_002f: bne.un.s IL_0016 - - IL_0031: ret - } - - .method public static void test8() cil managed - { - - .maxstack 5 - .locals init (string V_0, - int32 V_1, - int32 V_2, - char V_3) - IL_0000: ldsfld class assembly/test8@54 assembly/test8@54::@_instance - IL_0005: ldstr "1234" - IL_000a: call string [FSharp.Core]Microsoft.FSharp.Core.StringModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - string) - IL_000f: stloc.0 - IL_0010: ldc.i4.0 - IL_0011: stloc.2 - IL_0012: ldloc.0 - IL_0013: callvirt instance int32 [runtime]System.String::get_Length() - IL_0018: ldc.i4.1 - IL_0019: sub - IL_001a: stloc.1 - IL_001b: ldloc.1 - IL_001c: ldloc.2 - IL_001d: blt.s IL_0047 - - IL_001f: ldloc.0 - IL_0020: ldloc.2 - IL_0021: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0026: stloc.3 - IL_0027: ldstr "%O" - IL_002c: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,char>::.ctor(string) - IL_0031: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0036: ldloc.3 - IL_0037: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_003c: pop - IL_003d: ldloc.2 - IL_003e: ldc.i4.1 - IL_003f: add - IL_0040: stloc.2 - IL_0041: ldloc.2 - IL_0042: ldloc.1 - IL_0043: ldc.i4.1 - IL_0044: add - IL_0045: bne.un.s IL_001f - - IL_0047: ret - } - - .method public static void test9() cil managed - { - - .maxstack 5 - .locals init (string V_0, - int32 V_1, - int32 V_2, - char V_3, - string V_4) - IL_0000: ldsfld class assembly/test9@63 assembly/test9@63::@_instance - IL_0005: ldstr "1234" - IL_000a: call string [FSharp.Core]Microsoft.FSharp.Core.StringModule::Map(class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2, - string) - IL_000f: stloc.0 - IL_0010: ldc.i4.0 - IL_0011: stloc.2 - IL_0012: ldloc.0 - IL_0013: callvirt instance int32 [runtime]System.String::get_Length() - IL_0018: ldc.i4.1 - IL_0019: sub - IL_001a: stloc.1 - IL_001b: ldloc.1 - IL_001c: ldloc.2 - IL_001d: blt.s IL_005a - - IL_001f: ldloc.0 - IL_0020: ldloc.2 - IL_0021: callvirt instance char [netstandard]System.String::get_Chars(int32) - IL_0026: stloc.3 - IL_0027: ldstr "{0} foo" - IL_002c: ldloc.3 - IL_002d: box [runtime]System.Char - IL_0032: call string [runtime]System.String::Format(string, - object) - IL_0037: stloc.s V_4 - IL_0039: ldstr "%O" - IL_003e: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5,class [runtime]System.IO.TextWriter,class [FSharp.Core]Microsoft.FSharp.Core.Unit,class [FSharp.Core]Microsoft.FSharp.Core.Unit,string>::.ctor(string) - IL_0043: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine>(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0048: ldloc.s V_4 - IL_004a: callvirt instance !1 class [FSharp.Core]Microsoft.FSharp.Core.FSharpFunc`2::Invoke(!0) - IL_004f: pop - IL_0050: ldloc.2 - IL_0051: ldc.i4.1 - IL_0052: add - IL_0053: stloc.2 - IL_0054: ldloc.2 - IL_0055: ldloc.1 - IL_0056: ldc.i4.1 - IL_0057: add - IL_0058: bne.un.s IL_001f - - IL_005a: ret - } - -} - -.class private abstract auto ansi sealed ''.$assembly - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepByte.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepByte.fs deleted file mode 100644 index f4e047fb3d5..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepByte.fs +++ /dev/null @@ -1,57 +0,0 @@ -let mutable c = 0uy - -let f0 () = - for n in 10uy..1uy do - c <- n - -let f00 () = - for n in 10uy..1uy..1uy do - c <- n - -let f1 () = - for n in 1uy..10uy do - c <- n - -let f2 start = - for n in start..10uy do - c <- n - -let f3 finish = - for n in 1uy..finish do - c <- n - -let f4 (start: byte) finish = - for n in start..finish do - c <- n - -let f5 () = - for n in 1uy..1uy..10uy do - c <- n - -let f6 () = - for n in 1uy..2uy..10uy do - c <- n - -let f7uy start = - for n in start..2uy..10uy do - c <- n - -let f8 step = - for n in 1uy..step..10uy do - c <- n - -let f9 finish = - for n in 1uy..2uy..finish do - c <- n - -let f10 (start: byte) step finish = - for n in finish..step..finish do - c <- n - -let f11 start finish = - for n in start..0uy..finish do - c <- n - -let f12 () = - for n in 1uy..0uy..10uy do - c <- n diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepChar.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepChar.fs deleted file mode 100644 index 137044d13b9..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepChar.fs +++ /dev/null @@ -1,57 +0,0 @@ -let mutable c = '\000' - -let f0 () = - for n in 'z'..'a' do - c <- n - -let f00 () = - for n in 'z'..'\001'..'a' do - c <- n - -let f1 () = - for n in 'a'..'z' do - c <- n - -let f2 start = - for n in start..'z' do - c <- n - -let f3 finish = - for n in 'a'..finish do - c <- n - -let f4 (start: char) finish = - for n in start..finish do - c <- n - -let f5 () = - for n in 'a'..'\001'..'z' do - c <- n - -let f6 () = - for n in 'a'..'\002'..'z' do - c <- n - -let f7 start = - for n in start..'\002'..'z' do - c <- n - -let f8 step = - for n in 'a'..step..'z' do - c <- n - -let f9 finish = - for n in 'a'..'\002'..finish do - c <- n - -let f10 (start: char) step finish = - for n in finish..step..finish do - c <- n - -let f11 start finish = - for n in start..'\000'..finish do - c <- n - -let f12 () = - for n in 'a'..'\000'..'z' do - c <- n diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt16.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt16.fs deleted file mode 100644 index f664f0ad2de..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt16.fs +++ /dev/null @@ -1,65 +0,0 @@ -let mutable c = 0s - -let f0 () = - for n in 10s..1s do - c <- n - -let f00 () = - for n in 10s..1s..1s do - c <- n - -let f1 () = - for n in 1s..10s do - c <- n - -let f2 start = - for n in start..10s do - c <- n - -let f3 finish = - for n in 1s..finish do - c <- n - -let f4 (start: int16) finish = - for n in start..finish do - c <- n - -let f5 () = - for n in 1s..1s..10s do - c <- n - -let f6 () = - for n in 1s..2s..10s do - c <- n - -let f7 start = - for n in start..2s..10s do - c <- n - -let f8 step = - for n in 1s..step..10s do - c <- n - -let f9 finish = - for n in 1s..2s..finish do - c <- n - -let f10 (start: int16) step finish = - for n in finish..step..finish do - c <- n - -let f11 start finish = - for n in start..0s..finish do - c <- n - -let f12 () = - for n in 1s..0s..10s do - c <- n - -let f13 () = - for n in 10s .. -1s .. 1s do - c <- n - -let f14 () = - for n in 10s .. -2s .. 1s do - c <- n diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt32.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt32.fs deleted file mode 100644 index 32bca951da3..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt32.fs +++ /dev/null @@ -1,65 +0,0 @@ -let mutable c = 0 - -let f0 () = - for n in 10..1 do - c <- n - -let f00 () = - for n in 10..1..1 do - c <- n - -let f1 () = - for n in 1..10 do - c <- n - -let f2 start = - for n in start..10 do - c <- n - -let f3 finish = - for n in 1..finish do - c <- n - -let f4 start finish = - for n in start..finish do - c <- n - -let f5 () = - for n in 1..1..10 do - c <- n - -let f6 () = - for n in 1..2..10 do - c <- n - -let f7 start = - for n in start..2..10 do - c <- n - -let f8 step = - for n in 1..step..10 do - c <- n - -let f9 finish = - for n in 1..2..finish do - c <- n - -let f10 start step finish = - for n in finish..step..finish do - c <- n - -let f11 start finish = - for n in start..0..finish do - c <- n - -let f12 () = - for n in 1..0..10 do - c <- n - -let f13 () = - for n in 10..-1..1 do - c <- n - -let f14 () = - for n in 10..-2..1 do - c <- n diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt64.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt64.fs deleted file mode 100644 index 9e272eb300a..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepInt64.fs +++ /dev/null @@ -1,65 +0,0 @@ -let mutable c = 0L - -let f0 () = - for n in 10L..1L do - c <- n - -let f00 () = - for n in 10L..1L..1L do - c <- n - -let f1 () = - for n in 1L..10L do - c <- n - -let f2 start = - for n in start..10L do - c <- n - -let f3 finish = - for n in 1L..finish do - c <- n - -let f4 (start: int64) finish = - for n in start..finish do - c <- n - -let f5 () = - for n in 1L..1L..10L do - c <- n - -let f6 () = - for n in 1L..2L..10L do - c <- n - -let f7 start = - for n in start..2L..10L do - c <- n - -let f8 step = - for n in 1L..step..10L do - c <- n - -let f9 finish = - for n in 1L..2L..finish do - c <- n - -let f10 (start: int64) step finish = - for n in finish..step..finish do - c <- n - -let f11 start finish = - for n in start..0L..finish do - c <- n - -let f12 () = - for n in 1L..0L..10L do - c <- n - -let f13 () = - for n in 10L.. -1L ..1L do - c <- n - -let f14 () = - for n in 10L.. -2L ..1L do - c <- n diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepIntPtr.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepIntPtr.fs deleted file mode 100644 index 31464a36932..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepIntPtr.fs +++ /dev/null @@ -1,65 +0,0 @@ -let mutable c = 0n - -let f0 () = - for n in 10n..1n do - c <- n - -let f00 () = - for n in 10n..1n..1n do - c <- n - -let f1 () = - for n in 1n..10n do - c <- n - -let f2 start = - for n in start..10n do - c <- n - -let f3 finish = - for n in 1n..finish do - c <- n - -let f4 (start: nativeint) finish = - for n in start..finish do - c <- n - -let f5 () = - for n in 1n..1n..10n do - c <- n - -let f6 () = - for n in 1n..2n..10n do - c <- n - -let f7 start = - for n in start..2n..10n do - c <- n - -let f8 step = - for n in 1n..step..10n do - c <- n - -let f9 finish = - for n in 1n..2n..finish do - c <- n - -let f10 (start: nativeint) step finish = - for n in finish..step..finish do - c <- n - -let f11 start finish = - for n in start..0n..finish do - c <- n - -let f12 () = - for n in 1n..0n..10n do - c <- n - -let f13 () = - for n in 10n.. -1n ..1n do - c <- n - -let f14 () = - for n in 10n.. -2n ..1n do - c <- n diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepSByte.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepSByte.fs deleted file mode 100644 index ee96ee45237..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepSByte.fs +++ /dev/null @@ -1,65 +0,0 @@ -let mutable c = 0y - -let f0 () = - for n in 10y..1y do - c <- n - -let f00 () = - for n in 10y..1y..1y do - c <- n - -let f1 () = - for n in 1y..10y do - c <- n - -let f2 start = - for n in start..10y do - c <- n - -let f3 finish = - for n in 1y..finish do - c <- n - -let f4 (start: sbyte) finish = - for n in start..finish do - c <- n - -let f5 () = - for n in 1y..1y..10y do - c <- n - -let f6 () = - for n in 1y..2y..10y do - c <- n - -let f7 start = - for n in start..2y..10y do - c <- n - -let f8 step = - for n in 1y..step..10y do - c <- n - -let f9 finish = - for n in 1y..2y..finish do - c <- n - -let f10 (start: sbyte) step finish = - for n in finish..step..finish do - c <- n - -let f11 start finish = - for n in start..0y..finish do - c <- n - -let f12 () = - for n in 1y..0y..10y do - c <- n - -let f13 () = - for n in 10y .. -1y .. 1y do - c <- n - -let f14 () = - for n in 10y .. -2y .. 1y do - c <- n diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt16.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt16.fs deleted file mode 100644 index 64028b65394..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt16.fs +++ /dev/null @@ -1,57 +0,0 @@ -let mutable c = 0us - -let f0 () = - for n in 10us..1us do - c <- n - -let f00 () = - for n in 10us..1us..1us do - c <- n - -let f1 () = - for n in 1us..10us do - c <- n - -let f2 start = - for n in start..10us do - c <- n - -let f3 finish = - for n in 1us..finish do - c <- n - -let f4 (start: uint16) finish = - for n in start..finish do - c <- n - -let f5 () = - for n in 1us..1us..10us do - c <- n - -let f6 () = - for n in 1us..2us..10us do - c <- n - -let f7 start = - for n in start..2us..10us do - c <- n - -let f8 step = - for n in 1us..step..10us do - c <- n - -let f9 finish = - for n in 1us..2us..finish do - c <- n - -let f10 (start: uint16) step finish = - for n in finish..step..finish do - c <- n - -let f11 start finish = - for n in start..0us..finish do - c <- n - -let f12 () = - for n in 1us..0us..10us do - c <- n diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt32.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt32.fs deleted file mode 100644 index d689d8d393a..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt32.fs +++ /dev/null @@ -1,57 +0,0 @@ -let mutable c = 0u - -let f0 () = - for n in 10u..1u do - c <- n - -let f00 () = - for n in 10u..1u..1u do - c <- n - -let f1 () = - for n in 1u..10u do - c <- n - -let f2 start = - for n in start..10u do - c <- n - -let f3 finish = - for n in 1u..finish do - c <- n - -let f4 (start: uint32) finish = - for n in start..finish do - c <- n - -let f5 () = - for n in 1u..1u..10u do - c <- n - -let f6 () = - for n in 1u..2u..10u do - c <- n - -let f7 start = - for n in start..2u..10u do - c <- n - -let f8 step = - for n in 1u..step..10u do - c <- n - -let f9 finish = - for n in 1u..2u..finish do - c <- n - -let f10 (start: uint32) step finish = - for n in finish..step..finish do - c <- n - -let f11 start finish = - for n in start..0u..finish do - c <- n - -let f12 () = - for n in 1u..0u..10u do - c <- n diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt64.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt64.fs deleted file mode 100644 index 2a9b1627344..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUInt64.fs +++ /dev/null @@ -1,57 +0,0 @@ -let mutable c = 0UL - -let f0 () = - for n in 10UL..1UL do - c <- n - -let f00 () = - for n in 10UL..1UL..1UL do - c <- n - -let f1 () = - for n in 1UL..10UL do - c <- n - -let f2 start = - for n in start..10UL do - c <- n - -let f3 finish = - for n in 1UL..finish do - c <- n - -let f4 (start: uint64) finish = - for n in start..finish do - c <- n - -let f5 () = - for n in 1UL..1UL..10UL do - c <- n - -let f6 () = - for n in 1UL..2UL..10UL do - c <- n - -let f7 start = - for n in start..2UL..10UL do - c <- n - -let f8 step = - for n in 1UL..step..10UL do - c <- n - -let f9 finish = - for n in 1UL..2UL..finish do - c <- n - -let f10 (start: uint64) step finish = - for n in finish..step..finish do - c <- n - -let f11 start finish = - for n in start..0UL..finish do - c <- n - -let f12 () = - for n in 1UL..0UL..10UL do - c <- n diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUIntPtr.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUIntPtr.fs deleted file mode 100644 index 0ec7970c52a..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStepUIntPtr.fs +++ /dev/null @@ -1,57 +0,0 @@ -let mutable c = 0un - -let f0 () = - for n in 10un..1un do - c <- n - -let f00 () = - for n in 10un..1un..1un do - c <- n - -let f1 () = - for n in 1un..10un do - c <- n - -let f2 start = - for n in start..10un do - c <- n - -let f3 finish = - for n in 1un..finish do - c <- n - -let f4 (start: unativeint) finish = - for n in start..finish do - c <- n - -let f5 () = - for n in 1un..1un..10un do - c <- n - -let f6 () = - for n in 1un..2un..10un do - c <- n - -let f7 start = - for n in start..2un..10un do - c <- n - -let f8 step = - for n in 1un..step..10un do - c <- n - -let f9 finish = - for n in 1un..2un..finish do - c <- n - -let f10 (start: unativeint) step finish = - for n in finish..step..finish do - c <- n - -let f11 start finish = - for n in start..0un..finish do - c <- n - -let f12 () = - for n in 1un..0un..10un do - c <- n diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStep_UnitsOfMeasure.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStep_UnitsOfMeasure.fs deleted file mode 100644 index a142d0f5e00..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForEachRangeStep_UnitsOfMeasure.fs +++ /dev/null @@ -1,47 +0,0 @@ -open FSharp.Data.UnitSystems.SI.UnitSymbols - -let mutable c = 0L - -let f1 () = - for n in 10L..1L..1L do - c <- n - -let f2 () = - for n in 1L..1L..10L do - c <- n - -let f3 () = - for n in 1L..2L..10L do - c <- n - -let f4 start = - for n in start..2L..10L do - c <- n - -let f5 step = - for n in 1L..step..10L do - c <- n - -let f6 finish = - for n in 1L..2L..finish do - c <- n - -let f7 start step finish = - for n in start..step..finish do - c <- n - -let f8 start finish = - for n in start..0L..finish do - c <- n - -let f9 () = - for n in 1L..0L..10L do - c <- n - -let f10 () = - for n in 10L .. -1L..1L do - c <- n - -let f11 () = - for n in 10L .. -2L..1L do - c <- n diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForLoop.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForLoop.fs deleted file mode 100644 index 57fa5bd39ac..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ForLoop.fs +++ /dev/null @@ -1,220 +0,0 @@ -namespace EmittedIL.RealInternalSignature - -open Xunit -open FSharp.Test -open FSharp.Test.Compiler - -module ForLoopRealInternalSignatureOn = - - let verifyCompilation compilation = - compilation - |> withOptions [ "--test:EmitFeeFeeAs100001" ] - |> asExe - |> withOptimize - |> withEmbeddedPdb - |> withEmbedAllSource - |> ignoreWarnings - |> withRealInternalSignatureOn - |> verifyILBaseline - - // SOURCE=NoAllocationOfTuple01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoAllocationOfTuple01.dll" # NoAllocationOfTuple01.fs - [] - let ``NoAllocationOfTuple01_fs`` compilation = - compilation - |> verifyCompilation - - // SOURCE=ForEachOnArray01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ForEachOnArray01.dll" # ForEachOnArray01.fs - [] - let ``ForEachOnArray01_fs`` compilation = - compilation - |> verifyCompilation - - // SOURCE=ForEachOnList01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ForEachOnList01.dll" # ForEachOnList01.fs - [] - let ``ForEachOnList01_fs`` compilation = - compilation - |> verifyCompilation - - // SOURCE=ForEachOnString01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ForEachOnString01.dll" # ForEachOnString01.fs - [] - let ``ForEachOnString01_fs`` compilation = - compilation - |> verifyCompilation - - // SOURCE=ZeroToArrLength01.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ZeroToArrLength01.dll" # ZeroToArrLength01.fs - [] - let ``ZeroToArrLength01_fs`` compilation = - compilation - |> verifyCompilation - - // SOURCE=ZeroToArrLength02.fs SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd ZeroToArrLength02.dll" # ZeroToArrLength02.fs - [] - let ``ZeroToArrLength02_fs`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NoIEnumerable01.fsx SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoIEnumerable01.dll" # NoIEnumerable01.fsx - [] - let ``NoIEnumerable01_fsx`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NoIEnumerable02.fsx SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoIEnumerable02.dll" # NoIEnumerable02.fsx - [] - let ``NoIEnumerable02_fsx`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NoIEnumerable03.fsx SCFLAGS="-a -g --optimize+" COMPILE_ONLY=1 POSTCMD="..\\CompareIL.cmd NoIEnumerable03.dll" # NoIEnumerable03.fsx - [] - let ``NoIEnumerable03_fsx`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd01.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd01.fs --optimize+ - [] - let ``NonTrivialBranchingBindingInEnd01_fs_opt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd01.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd01.fs --optimize- - [] - let ``NonTrivialBranchingBindingInEnd01_fs_nonopt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd02.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd02.fs --optimize+ - [] - let ``NonTrivialBranchingBindingInEnd02_fs_opt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd02.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd02.fs --optimize- - [] - let ``NonTrivialBranchingBindingInEnd02_fs_nonopt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd03.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd03.fs --optimize+ - [] - let ``NonTrivialBranchingBindingInEnd03_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd03.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd03.fs --optimize- - [] - let ``NonTrivialBranchingBindingInEnd03_fs_nonopt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd04.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd04.fs --optimize+ - [] - let ``NonTrivialBranchingBindingInEnd04_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd04.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd04.fs --optimize- - [] - let ``NonTrivialBranchingBindingInEnd04_fs_nonopt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd05.fs SCFLAGS="--optimize+" # NonTrivialBranchingBindingInEnd05.fs --optimize+ - [] - let ``NonTrivialBranchingBindingInEnd05_fs_opt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=NonTrivialBranchingBindingInEnd05.fs SCFLAGS="--optimize-" # NonTrivialBranchingBindingInEnd05.fs --optimize- - [] - let ``NonTrivialBranchingBindingInEnd05_fs_nonopt`` compilation = - compilation - |> verifyCompilation - - // SOURCE=ForEachRangeStepSByte.fs SCFLAGS="--optimize+" # ForEachRangeStepSByte.fs --optimize+ - [] - let ``ForEachRangeStepSByte_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepByte.fs SCFLAGS="--optimize+" # ForEachRangeStepByte.fs --optimize+ - [] - let ``ForEachRangeStepByte_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepChar.fs SCFLAGS="--optimize+" # ForEachRangeStepChar.fs --optimize+ - [] - let ``ForEachRangeStepChar_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepInt16.fs SCFLAGS="--optimize+" # ForEachRangeStepInt16.fs --optimize+ - [] - let ``ForEachRangeStepInt16_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepUInt16.fs SCFLAGS="--optimize+" # ForEachRangeStepUInt16.fs --optimize+ - [] - let ``ForEachRangeStepUInt16_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepInt32.fs SCFLAGS="--optimize+" # ForEachRangeStepInt32.fs --optimize+ - [] - let ``ForEachRangeStepInt32_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepUInt32.fs SCFLAGS="--optimize+" # ForEachRangeStepUInt32.fs --optimize+ - [] - let ``ForEachRangeStepUInt32_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepInt64.fs SCFLAGS="--optimize+" # ForEachRangeStepInt64.fs --optimize+ - [] - let ``ForEachRangeStepInt64_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepUInt64.fs SCFLAGS="--optimize+" # ForEachRangeStepUInt64.fs --optimize+ - [] - let ``ForEachRangeStepUInt64_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepIntPtr.fs SCFLAGS="--optimize+" # ForEachRangeStepIntPtr.fs --optimize+ - [] - let ``ForEachRangeStepIntPtr_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStepUIntPtr.fs SCFLAGS="--optimize+" # ForEachRangeStepUIntPtr.fs --optimize+ - [] - let ``ForEachRangeStepUIntPtr_fs_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation - - // SOURCE=ForEachRangeStep_UnitsOfMeasure.fs SCFLAGS="--optimize+" # ForEachRangeStep_UnitsOfMeasure.fs --optimize+ - [] - let ``ForEachRangeStep_UnitsOfMeasure_opt`` compilation = - compilation - |> withLangVersionPreview // TODO https://github.com/dotnet/fsharp/issues/16739: Remove this when LanguageFeature.LowerIntegralRangesToFastLoops is out of preview. - |> verifyCompilation diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoAllocationOfTuple01.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoAllocationOfTuple01.fs deleted file mode 100644 index 54c5dd3c27c..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoAllocationOfTuple01.fs +++ /dev/null @@ -1,11 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow #NoMono #ReqNOMT -// Regression test for FSHARP1.0:5408 -// For-loop emitted with unnecessary tuple -module NoAllocationOfTuple01 -let loop n = - let a = Array.zeroCreate n - let mutable i = -1 - for j = 1 to n do - i <- i + 1 - a.[ i ] <- j // creates an unnecessary temporary tuple - a diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx deleted file mode 100644 index 6c6ab9e6c2f..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx +++ /dev/null @@ -1,8 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow #NoMono #ReqNOMT -// Regression test for FSHARP1.0:6064 - -module M - -let loop1 N = - for i in 1 .. N do - printfn "aaa" diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.net472.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.net472.debug.bsl deleted file mode 100644 index 4c0acb5b6ba..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.net472.debug.bsl +++ /dev/null @@ -1,96 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop1(int32 N) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1) - IL_0000: ldc.i4.1 - IL_0001: stloc.1 - IL_0002: ldarg.0 - IL_0003: stloc.0 - IL_0004: ldloc.0 - IL_0005: ldloc.1 - IL_0006: blt.s IL_0022 - - IL_0008: ldstr "aaa" - IL_000d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0012: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0017: pop - IL_0018: ldloc.1 - IL_0019: ldc.i4.1 - IL_001a: add - IL_001b: stloc.1 - IL_001c: ldloc.1 - IL_001d: ldloc.0 - IL_001e: ldc.i4.1 - IL_001f: add - IL_0020: bne.un.s IL_0008 - - IL_0022: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.net472.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.net472.release.bsl deleted file mode 100644 index 1c1f3221262..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.net472.release.bsl +++ /dev/null @@ -1,106 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:0:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop1(int32 N) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2) - IL_0000: ldc.i4.1 - IL_0001: stloc.1 - IL_0002: ldarg.0 - IL_0003: stloc.0 - IL_0004: ldloc.0 - IL_0005: ldloc.1 - IL_0006: blt.s IL_0029 - - IL_0008: ldstr "aaa" - IL_000d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0012: stloc.2 - IL_0013: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_0018: ldloc.2 - IL_0019: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_001e: pop - IL_001f: ldloc.1 - IL_0020: ldc.i4.1 - IL_0021: add - IL_0022: stloc.1 - IL_0023: ldloc.1 - IL_0024: ldloc.0 - IL_0025: ldc.i4.1 - IL_0026: add - IL_0027: bne.un.s IL_0008 - - IL_0029: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.netcore.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.netcore.debug.bsl deleted file mode 100644 index 4c0acb5b6ba..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable01.fsx.il.netcore.debug.bsl +++ /dev/null @@ -1,96 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop1(int32 N) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1) - IL_0000: ldc.i4.1 - IL_0001: stloc.1 - IL_0002: ldarg.0 - IL_0003: stloc.0 - IL_0004: ldloc.0 - IL_0005: ldloc.1 - IL_0006: blt.s IL_0022 - - IL_0008: ldstr "aaa" - IL_000d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0012: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0017: pop - IL_0018: ldloc.1 - IL_0019: ldc.i4.1 - IL_001a: add - IL_001b: stloc.1 - IL_001c: ldloc.1 - IL_001d: ldloc.0 - IL_001e: ldc.i4.1 - IL_001f: add - IL_0020: bne.un.s IL_0008 - - IL_0022: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx deleted file mode 100644 index 14fa58c1458..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx +++ /dev/null @@ -1,8 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow #NoMono #ReqNOMT -// Regression test for FSHARP1.0:6064 - -module M - -let loop2 N = - for i in 100 .. N do - printfn "aaa" diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.net472.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.net472.debug.bsl deleted file mode 100644 index e31d59290d9..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.net472.debug.bsl +++ /dev/null @@ -1,96 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop2(int32 N) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1) - IL_0000: ldc.i4.s 100 - IL_0002: stloc.1 - IL_0003: ldarg.0 - IL_0004: stloc.0 - IL_0005: ldloc.0 - IL_0006: ldloc.1 - IL_0007: blt.s IL_0023 - - IL_0009: ldstr "aaa" - IL_000e: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0013: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0018: pop - IL_0019: ldloc.1 - IL_001a: ldc.i4.1 - IL_001b: add - IL_001c: stloc.1 - IL_001d: ldloc.1 - IL_001e: ldloc.0 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: bne.un.s IL_0009 - - IL_0023: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.net472.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.net472.release.bsl deleted file mode 100644 index 5db215b7499..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.net472.release.bsl +++ /dev/null @@ -1,106 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:0:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop2(int32 N) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2) - IL_0000: ldc.i4.s 100 - IL_0002: stloc.1 - IL_0003: ldarg.0 - IL_0004: stloc.0 - IL_0005: ldloc.0 - IL_0006: ldloc.1 - IL_0007: blt.s IL_002a - - IL_0009: ldstr "aaa" - IL_000e: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0013: stloc.2 - IL_0014: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_0019: ldloc.2 - IL_001a: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_001f: pop - IL_0020: ldloc.1 - IL_0021: ldc.i4.1 - IL_0022: add - IL_0023: stloc.1 - IL_0024: ldloc.1 - IL_0025: ldloc.0 - IL_0026: ldc.i4.1 - IL_0027: add - IL_0028: bne.un.s IL_0009 - - IL_002a: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.netcore.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.netcore.debug.bsl deleted file mode 100644 index e31d59290d9..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable02.fsx.il.netcore.debug.bsl +++ /dev/null @@ -1,96 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop2(int32 N) cil managed - { - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1) - IL_0000: ldc.i4.s 100 - IL_0002: stloc.1 - IL_0003: ldarg.0 - IL_0004: stloc.0 - IL_0005: ldloc.0 - IL_0006: ldloc.1 - IL_0007: blt.s IL_0023 - - IL_0009: ldstr "aaa" - IL_000e: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0013: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0018: pop - IL_0019: ldloc.1 - IL_001a: ldc.i4.1 - IL_001b: add - IL_001c: stloc.1 - IL_001d: ldloc.1 - IL_001e: ldloc.0 - IL_001f: ldc.i4.1 - IL_0020: add - IL_0021: bne.un.s IL_0009 - - IL_0023: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx deleted file mode 100644 index a445b6fd3dd..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx +++ /dev/null @@ -1,9 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow #NoMono #ReqNOMT -// Regression test for FSHARP1.0:6064 - -module M - -let loop3 a N = - for i in a .. N do - printfn "aaa" - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.net472.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.net472.debug.bsl deleted file mode 100644 index c580ba49eec..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.net472.debug.bsl +++ /dev/null @@ -1,98 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop3(int32 a, - int32 N) cil managed - { - .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 ) - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1) - IL_0000: ldarg.0 - IL_0001: stloc.1 - IL_0002: ldarg.1 - IL_0003: stloc.0 - IL_0004: ldloc.0 - IL_0005: ldloc.1 - IL_0006: blt.s IL_0022 - - IL_0008: ldstr "aaa" - IL_000d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0012: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0017: pop - IL_0018: ldloc.1 - IL_0019: ldc.i4.1 - IL_001a: add - IL_001b: stloc.1 - IL_001c: ldloc.1 - IL_001d: ldloc.0 - IL_001e: ldc.i4.1 - IL_001f: add - IL_0020: bne.un.s IL_0008 - - IL_0022: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.net472.release.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.net472.release.bsl deleted file mode 100644 index 30f24778b50..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.net472.release.bsl +++ /dev/null @@ -1,108 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly extern netstandard -{ - .publickeytoken = (CC 7B 13 FF CD 2D DD 51 ) - .ver 2:0:0:0 -} -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop3(int32 a, - int32 N) cil managed - { - .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 ) - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4 V_2) - IL_0000: ldarg.0 - IL_0001: stloc.1 - IL_0002: ldarg.1 - IL_0003: stloc.0 - IL_0004: ldloc.0 - IL_0005: ldloc.1 - IL_0006: blt.s IL_0029 - - IL_0008: ldstr "aaa" - IL_000d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0012: stloc.2 - IL_0013: call class [netstandard]System.IO.TextWriter [netstandard]System.Console::get_Out() - IL_0018: ldloc.2 - IL_0019: call !!0 [FSharp.Core]Microsoft.FSharp.Core.PrintfModule::PrintFormatLineToTextWriter(class [runtime]System.IO.TextWriter, - class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_001e: pop - IL_001f: ldloc.1 - IL_0020: ldc.i4.1 - IL_0021: add - IL_0022: stloc.1 - IL_0023: ldloc.1 - IL_0024: ldloc.0 - IL_0025: ldc.i4.1 - IL_0026: add - IL_0027: bne.un.s IL_0008 - - IL_0029: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.netcore.debug.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.netcore.debug.bsl deleted file mode 100644 index c580ba49eec..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NoIEnumerable03.fsx.il.netcore.debug.bsl +++ /dev/null @@ -1,98 +0,0 @@ - - - - - -.assembly extern runtime { } -.assembly extern FSharp.Core { } -.assembly assembly -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.FSharpInterfaceDataVersionAttribute::.ctor(int32, - int32, - int32) = ( 01 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 ) - - - - - .hash algorithm 0x00008004 - .ver 0:0:0:0 -} -.mresource public FSharpSignatureData.assembly -{ - - -} -.mresource public FSharpOptimizationData.assembly -{ - - -} -.module assembly.exe - -.imagebase {value} -.file alignment 0x00000200 -.stackreserve 0x00100000 -.subsystem 0x0003 -.corflags 0x00000001 - - - - - -.class public abstract auto ansi sealed M - extends [runtime]System.Object -{ - .custom instance void [FSharp.Core]Microsoft.FSharp.Core.CompilationMappingAttribute::.ctor(valuetype [FSharp.Core]Microsoft.FSharp.Core.SourceConstructFlags) = ( 01 00 07 00 00 00 00 00 ) - .method public static void loop3(int32 a, - int32 N) cil managed - { - .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 ) - - .maxstack 5 - .locals init (int32 V_0, - int32 V_1) - IL_0000: ldarg.0 - IL_0001: stloc.1 - IL_0002: ldarg.1 - IL_0003: stloc.0 - IL_0004: ldloc.0 - IL_0005: ldloc.1 - IL_0006: blt.s IL_0022 - - IL_0008: ldstr "aaa" - IL_000d: newobj instance void class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`5::.ctor(string) - IL_0012: call !!0 [FSharp.Core]Microsoft.FSharp.Core.ExtraTopLevelOperators::PrintFormatLine(class [FSharp.Core]Microsoft.FSharp.Core.PrintfFormat`4) - IL_0017: pop - IL_0018: ldloc.1 - IL_0019: ldc.i4.1 - IL_001a: add - IL_001b: stloc.1 - IL_001c: ldloc.1 - IL_001d: ldloc.0 - IL_001e: ldc.i4.1 - IL_001f: add - IL_0020: bne.un.s IL_0008 - - IL_0022: ret - } - -} - -.class private abstract auto ansi sealed ''.$M$fsx - extends [runtime]System.Object -{ - .method public static void main@() cil managed - { - .entrypoint - - .maxstack 8 - IL_0000: ret - } - -} - - - - - - diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd01.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd01.fs deleted file mode 100644 index 9288143b4de..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd01.fs +++ /dev/null @@ -1,12 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow -// Regression test for FSHARP1.0:5306 -// Bad codegen while optimizing for-loops with non-trivial branching and binding in end -// - -let r = Array.create 8 1 -let w = Array.create 5 2 - -for j = 0 to (min r.Length w.Length) - 1 do - r.[j] <- r.[j] + w.[j] - -(if r.[0] = 3 then 0 else 1) |> exit diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd02.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd02.fs deleted file mode 100644 index 9f976b52b52..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd02.fs +++ /dev/null @@ -1,12 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow -// Regression test for FSHARP1.0:5306 -// Bad codegen while optimizing for-loops with non-trivial branching and binding in end -// - -let r = Array.create 8 1 -let w = Array.create 5 2 - - -for j = (min r.Length w.Length) - 1 downto 0 do - r.[j] <- r.[j] + w.[j] -(if r.[0] = 3 then 0 else 1) |> exit diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd03.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd03.fs deleted file mode 100644 index 25e457f4509..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd03.fs +++ /dev/null @@ -1,11 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow -// Regression test for FSHARP1.0:5306 -// Bad codegen while optimizing for-loops with non-trivial branching and binding in end -// - -let r = Array.create 8 1 -let w = Array.create 5 2 - -for j in [0 .. (min r.Length w.Length) - 1] do - r.[j] <- r.[j] + w.[j] -(if r.[0] = 3 then 0 else 1) |> exit diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd04.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd04.fs deleted file mode 100644 index 57bf33efac2..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd04.fs +++ /dev/null @@ -1,11 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow -// Regression test for FSHARP1.0:5306 -// Bad codegen while optimizing for-loops with non-trivial branching and binding in end -// - -let r = Array.create 8 1 -let w = Array.create 5 2 - -for j in [(min r.Length w.Length) - 1 .. -1 .. 0] do - r.[j] <- r.[j] + w.[j] -(if r.[0] = 3 then 0 else 1) |> exit diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd05.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd05.fs deleted file mode 100644 index 1c3e67958e4..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/NonTrivialBranchingBindingInEnd05.fs +++ /dev/null @@ -1,12 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow -// Regression test for FSHARP1.0:5306 -// Bad codegen while optimizing for-loops with non-trivial branching and binding in end -// - -let r = Array.create 8 1 -let w = Array.create 5 2 - -for k = 0 to (min r.Length w.Length) - 1 do - for j = 0 to (min r.Length w.Length) - 1 do - r.[j] <- r.[j] + w.[j] -(if r.[0] = 11 then 0 else 1) |> exit diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ZeroToArrLength01.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ZeroToArrLength01.fs deleted file mode 100644 index 68f256b2add..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ZeroToArrLength01.fs +++ /dev/null @@ -1,7 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow #NoMono #ReqNOMT -// -// Regression test for FSHARP1.0:4461 -module ZeroToArrLength01 -let f1(arr:int[]) = - for i = 0 to arr.Length - 1 do - arr.[i] <- i diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ZeroToArrLength02.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ZeroToArrLength02.fs deleted file mode 100644 index 96ec6ca9cad..00000000000 --- a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ZeroToArrLength02.fs +++ /dev/null @@ -1,7 +0,0 @@ -// #Regression #CodeGen #Optimizations #ControlFlow #NoMono #ReqNOMT -// -// Regression test for FSHARP1.0:4461 -module ZeroToArrLength02 -let f1(arr:int[]) = - for i = 0 to Array.length arr - 1 do - arr.[i] <- i diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ZeroToArrLength01.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ZeroToArrLength01.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ZeroToArrLength01.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ZeroToArrLength01.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ZeroToArrLength01.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ZeroToArrLength01.fs.RealInternalSignatureOff.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ZeroToArrLength01.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ZeroToArrLength01.fs.RealInternalSignatureOff.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ZeroToArrLength01.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ZeroToArrLength01.fs.RealInternalSignatureOn.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ZeroToArrLength01.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ZeroToArrLength01.fs.RealInternalSignatureOn.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ZeroToArrLength02.fs b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ZeroToArrLength02.fs similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ZeroToArrLength02.fs rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ZeroToArrLength02.fs diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ZeroToArrLength02.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ZeroToArrLength02.fs.RealInternalSignatureOff.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOff/ZeroToArrLength02.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ZeroToArrLength02.fs.RealInternalSignatureOff.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ZeroToArrLength02.fs.il.bsl b/tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ZeroToArrLength02.fs.RealInternalSignatureOn.il.bsl similarity index 100% rename from tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/RealInternalSignatureOn/ZeroToArrLength02.fs.il.bsl rename to tests/FSharp.Compiler.ComponentTests/EmittedIL/ForLoop/ZeroToArrLength02.fs.RealInternalSignatureOn.il.bsl diff --git a/tests/FSharp.Compiler.ComponentTests/FSharp.Compiler.ComponentTests.fsproj b/tests/FSharp.Compiler.ComponentTests/FSharp.Compiler.ComponentTests.fsproj index fec09aa52d9..4f52ba14ae0 100644 --- a/tests/FSharp.Compiler.ComponentTests/FSharp.Compiler.ComponentTests.fsproj +++ b/tests/FSharp.Compiler.ComponentTests/FSharp.Compiler.ComponentTests.fsproj @@ -154,8 +154,7 @@ - - + diff --git a/tests/FSharp.Test.Utilities/ILChecker.fs b/tests/FSharp.Test.Utilities/ILChecker.fs index 0db96f449ee..3c60114d85e 100644 --- a/tests/FSharp.Test.Utilities/ILChecker.fs +++ b/tests/FSharp.Test.Utilities/ILChecker.fs @@ -72,11 +72,15 @@ module ILChecker = |> unifyRuntimeAssemblyName |> unifyImageBase + // This lets the same test be used when targeting both netfx and netcore. + let unifyNetStandardVersions (text: string) = text.Replace(".ver 2:0:0:0", ".ver 2:1:0:0") + ilCode.Trim() |> normalizeNewLines |> stripComments |> unifyingAssemblyNames |> unifyMethodLine + |> unifyNetStandardVersions let private generateIlFile dllFilePath ildasmArgs = let ilFilePath = Path.ChangeExtension(dllFilePath, ".il") @@ -120,9 +124,9 @@ module ILChecker = match expectedIL with | [] -> errorMsgOpt <- Some "No Expected IL" | expectedIL -> - expectedIL - |> List.map (fun (ilCode: string) -> ilCode.Trim()) - |> List.iter (fun (ilCode: string) -> + let (|Trimmed|) (ilCode: string) = ilCode.Trim() + + for Trimmed ilCode in expectedIL do let expectedLines = ilCode |> normalizeILText (Some assemblyName) |> prepareLines if expectedLines.Length = 0 then @@ -150,7 +154,6 @@ module ILChecker = if errors.Count > 0 then let msg = String.concat "\n" errors + "\n\n\Expected:\n" + ilCode + "\n" errorMsgOpt <- Some(msg + "\n\n\nActual:\n" + String.Join("\n", actualLines, 0, expectedLines.Length)) - ) match errorMsgOpt with | Some msg ->